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«REM % 

IDENTIFICATION 
PRODUCT CODE: AC=F621C=-MC 
PRODUCT NAME: CKKABCO 11/44 TRAPS 
DATE CREATED: APRIL, 1981 
MAINTAINER: DIAGNOSTIC GROUP 
AUTHOR : DAN MILLEVILLE 


COPYRIGHT (C) 1979, 1981 DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 


THIS SOFTWARE IS FURNISHED TO PURCHASER UNDER A LICENSE FOR USE 
ON A SINGLE COMPUTER SYSTEM AND CAN BE COPIED (WITH INCLUSION 
OF DEC'S COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT 
AS MAY OTHERWISE BE PROVIDED IN WRITING BY DEC. 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. 


DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF 
ITS SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC. 


— 
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34 1. ABSTRACT 
35 


Hatt IS TEST OF ALL OPERATIONS AND gts ey THAT CAUSE 
APS. ALSO TESTED ARE TRAP OVERFLOW CONDITION 
ODDITies OF REGISTER 6, INTERRUPTS , THE RESET AND WAIT INSTRUCTIONS. 


BUF 


eee 
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2.2 


REQUIREMENTS 

EQUIPMENT 

11/44 STANDARD COMPUTER 
STORAGE 


2.2.1 PROGRAM oes ~- THF ROUTINE USES MEMORY 
FROM 0000 TO 17600. 


SEQUENCE 


3 


fesse 
i 
{ 
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3. LOADING PROCEDURE 
. ME THOD 


PROCEDURE FOR NORMAL ABSOLUTE TAPES SHOULD BE FOLLOWED. 


SEQUENCE 


4 
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STARTING PROCEDURE 


THE PROGRAM STARTS AT 290. 


IF IT IS DESIRED TO RESET THE PASS COUNT BACK TO 
ZERO ; THEN START THIS PROGRAM AT LOCATION 210 


PROGRAM AND/OR OPERATOR ACTION 


LOAD PROGRAM INTO MEMORY. (BOTTOM 4K) 
LOAD ADDRESS. 


START. 
THE PROGRAM WILL LOOP 


IT WILL PRINT “CKKABCO 11/44 TRAPS'' AFTER THE FIRST ITERATION 
AND THEN PRINTS IT EVERY 15 TIMES(APROXIMATELY EVERY 15 SECONDS) 


G 1 
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a« OPERATION 


ae 1 SUBROUTINE ABSTRACTS 
5.1.1 BEGIN AT 200 
5.1.2 SCOPE 


IF A SCOPE LOOP IS NEEDED INSERT A BRANCH AS THE 
COMMENT TO THE HALT EXPLAINS. 


5.1.3 TRAPCATCHER 


THIS IS A SERIES OF INSTRUCTIONS DESIGNED TO DETECT AND 
ISOLATE UNEXPECTED TRAPS AND INTERRUPTS, THAT OCCUR IN THE 
TRAP AND INTERRUPT VECTOR AREA OF MEMORY. 


-- THE PRINCIPLE OF THIS ROUTINE IS: THE VECTOR ENTRANCE 
ADDRESS POINTS TO THE NEXT SEQUENTIAL WORD WHICH WILL CON- 
TAIN A HALT (000000) (THIS LOCATION IS ALSO THE STATUS 
WORD FOR THAT VECTOR ENTRANCE. BUT THIS WILL HAVE * EFFECT 
ON IT ALSO BEING THE NEXT INSTRUCTION). 


IF A HALT OCCURS IN THE TRAP OR INTERRUPT VECTOR AREA, 
REGISTER SIX SHOULD BE EXAMINED TO DETERMINE ITS CONTENTS, 
THEN USE REGISTER SIX CONTENTS AS AN ADDRESS TO DETERMINE 
WHERE THE anon tam WAS. WHEN THE INTERRUPT OR 

TRAP OCCURRED; MEMORY AS SPECIFIED BY R6 CONTAINS THE 

PC OF THE INSTRUCTION FOLLOWING THE INSTRUCTION WHERE THE 
TRAP OCCURRED. 


ad aed aed aed 
SSSSy0 9200000 0RRrRErrwaw yaya yNd BS 


104 THE CONTENTS OF LOCATION ‘$TESTN'(304) CONTAINS 
105 THE TEST NUMBER THAT IT WAS DOING BEFORE IT 
bs TRAPPED. 
4 5.2 PROGRAM AND/OR OPERATOR ACTION 
110 a opt AND STARTING AT 200 STARTS THE TEST. IF 
111 AN ERROR IS DETECTED, THERE WILL BE A HALT. 
112 NOTE:IF A SCOPE LOOP IS NEEDED 
113 THE COMMENT SECTION OF THE HALT EXPLAINS 
114 HOW TO UTILIZE THIS LOOP. 

YA 

eae 

a 


4 
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6. 


ERRORS : 

ALL ERRORS WILL CAUSE A HALT.., 

THE PROGRAM CHECKS TO SEE THAT THE P.C. DOESN'T JUMP 
WITHIN THE TESTS, BY A SEQUENCE COUNT CALLED ‘STSTN® 
THIS TEST 1S A SEQUENCIAL INCREMENT AND COMPARE COUNT. 
EXAMPLE 

INC —- $TSTNM INCREMENT THE TEST NUMBER 

(MP = #A, STSTNM COMPARE FOR THE RIGHT TEST 

BNE —- TSTA+1-12 ;1F NOT CORRECT BRANCH TO A HALT 


BEQ 1000$ ;BRANCH AROUND JUMP IF OK 
JMP TSTA+1=12 ; JUMP (USED FOR LONG TESTS THE BRANCH CAN'T REACH) 


CODE 


IMPORTANT 


(APPR SSASSSESALS SEAL ASAD D SS S| 


6.2 


be 
IF AN ERROR IS DETECTED ;IT COULD BE BECAUSE OF THREE REASONS. 
WRONG TEST NUMBER 


A) 
B) ERROR IN THE PRESENT TEST. 
C) POWER MONITOR BIT PROBLEM. 


VILILITTIATTTAA LAT TATA ATT AT ATTA TATA 
THE TEST SEQUENCE LOCATION ‘‘TESTN’* SHOULD BE CHECKED FIRST 
TO SEE IF IT MATCHES THE PRESENT TEST. 

IF IT DOESN'T MATCH ; THEN THE CONTENTS OF THIS LOCATION 
TELL YOU WHICH TEST IT WAS DOING BEFORE IT HALTED. 
VILITLTTATTLT LATA TTA TATA ALLA AT 


ERROR RECOVERY 
ON TRAP ERRORS - RESTART AT STARTING ADDRESS 
ON POWER MONITOR ERRORS - FIND OUT WHAT POWER SUPPLY PROBLEM (OR CPU 


ERROR REGISTER PROBLEM) THERE IS AND OBTAIN REPAIR BEFORE RERUNNING 
THIS DIAGNOSTIC 


coos ++ 


| CKKABCO 11/44 TRAPS 
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RESTRICTIONS 

STARTING RESTRICTION 
NONE 

OPERATIONAL RESTRICTION 
NONE 


. 
Pr > 
as Xo * 
“ < és 
* 


SEQUENCE 
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8. MISCELLANEOUS 
8.1 EXECUTION TIME 
1ST PASS APPROX. 2 SEC., THEREAFTER EVERY 15 SEC 


SEQUENCE 


9 


poor ae 


K 1 
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ek ek ad a dd a a a 
Oo 00 00 OP CO QU 0000 0000 FINI SII 


| 


9. 


PROGRAM DESCRIPTION 


THIS PROGRAM CHECKS THAT ON ALL TRAP OPERATIONS et 
6 IS DECREMENTED THE CORRECT AMOUNT, THAT THE CORRECT 
PC IS SAVED ON THE STACK, THAT THE OLD eth CODES AND 


CONDITION CODES ARE CORRECT. BOTH THE ATRAP™ AND * 

TRAP INSTRUCTIONS ARE TESTED TO “EE THAT ALL COMBINATIONS WILL 
TRAP. CHECKED ALSO IS THAT ALL RESERVED INSTRUCTIONS 

ILL TRAP. VERIFICATION OF THE ‘‘TRT’’ INSTRUCTION (00003) 


ROUTINES: 
ALSO, THE TRACE BIT IS CHECKED TO SEE IF IT CAUSES A TRAP. 
THE RTI AND RTT INSTRUCTIONS ARE CHECKED. STACK OVERFLOW IS 
ALSO CHECKED FOR ALL THE TRAP INSTRUCTIONS. 
SPECIAL CHECKS ARE MADE TO SEE IF BUS 
ep tart A cena ON NON-EXISTENT MEMORY.PIRQ TRAPS ARE CHECKED 


10 


eee, | 


nn 
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10.0 RUNNING UNDER APT 


THE EXECUTION TIMES PROVIDED IN THE APT SCRIPT THAT FOLLOWS 
ARE FOR EXECUTION WITH A 11/44 PROCESSOR, CACHE, 
16K CORE MEMORY, AND 300 BAUD. 

THE FOLLOWING IS A PROGRAM LOAD FILE USED BY APT: 
1. E TABLE 'A' IS USED FOR APT DUMP MODE. 


2. E TABLE ‘B' IS USED FOR APT QV AND RUN TIME MODES. 
SENVM=040 INDICATES THAT TYPEOUTS WILL BE SUPRESSED. 


1ST PASS LONGEST eS eae 
RUN TIME TEST TIME RUN TIME 
5 5 0 
seeeee E TABLES coccecce 
A B 
E-MODE /S~MODE 000/000 040/001 
(SENVM/SENV) 
SWITCH REGISTER 1 000000 000000 
($SWREG) 
SWITCH REGISTER 2 000000 000000 
CPU TYPE/OPTIONS 00/0000 00/0000 


| 


| ace em es eer er Sellen een eter heer 
| %, OEE RBS Eig aa nah ip Sy 


| m1 
| CKRABCO 11/44 TRAPS = MACRO MITTS 25-APR-B1 12:4)" PAGE 13 SEQUENCE 12 
| 

219 11.0 REVISION HISTORY 
8 Eee ti REVISION DATE COMMENT 

7 ae CKKABA MARCH 1979 ORIGINAL RELEASE 

224 vil CKKABB NAVEMBER 1980 FIX DIAGNOSTIC HALT WITH CIS SWITCH IN 

225 THE MAINTENANCE POSITION 

5 Be CKKABC APRIL 1981 INCLUSION OF BIT 0 CHECKING BEFORE EACH 


| CKKABCO 11/44 TRAPS 
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- TITLE 


CKKABCO 11/44 TRAPS 


zALL INSTRUCTIONS THAT ARE RS 


HOULD 


TRAP TO LOCATION 10 


3 SH AND THE 
[PC THAT POINTS TO THE TRAPPING INSTRUCTION 
SHOULD BE PLACED ON THE STACK 


SLISTING 


-MCALL 


«L 

-NLIST MC 

-NLIST MD 

«NLIST_ CND 

-ENABLE ABS 
NABLE AMA 


’ 3ILLEGAL ADDRESSES 
RTRAP4=14 3FOR TRACE TRAP 
FOR EMULATOR TRAP 
FOR IOT TRAP 
=34 FOR TRAP INST 


NOP=240 
STATUS=177776 
TRAPA=10 


RTRAP=10 
ILLA=004700 


_SAPTHDR,. SAPTBLS, .SACT11 


SEQUENCE 


13 
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00000 
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+2 
.+2 
+2 
+2 
.+2 
.+2 
.+2 
.+2 
-+2 
.+2 
.+2 
.+2 
-+2 
.+2 
.+2 
.+2 
.+2 
.+2 
.+2 
.+2 
.+2 
.+2 
.+2 
.+2 
.+2 
.+2 
.+2 
.+2 
.+2 


B 2 


s ADDRESS OF NEXT , 


Be 
wn 
3 
“4 
mom 
=) 
x= 
mm 
P"] 
m 

. 


Z ADDRESS OF NEXT : 


31F HALTED HERE, 
SAD DRESS OF NEXT 
F HALTED HERE, 


oF 
; ADDRESS OF NEXT ‘ 


ec. 
“ADDRESS OF NEXT 


—~ 
oO 


PREVIOUS 


O PREVIOUS 


PREVIOUS 
PREVIOUS 
PREVIOUS 


O PREVIOUS 


PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 


O PREVIOUS 


LOCATION 


PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 





SEQUENCE 


ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 


ADDRESS" 


ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
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CKKABCO 11/44 TRAPS 
000162 000000 
000164 000166 
66 000000 
000170 000172 
000000 
000174 000176 
000000 
200 000202 
000000 
204 000206 
000206 000000 
000210 000212 
000000 
000214 000216 
000000 
000220 000222 
000000 
000224 000226 
26 000000 
000232 
000000 
234 000236 
000000 
000240 000242 
000000 
000244 000246 
000000 
000250 000252 
000000 
000254 000256 
000000 
000262 
000000 
264 000266 
000266 000000 
000270 000272 
000000 
000274 000276 
000000 
300 000302 
000000 
000306 
06 000000 
000310 000312 
000000 
000314 000316 
000000 
000320 000322 
000000 
000324 000326 
000000 
330 000332 
000000 
334 000336 
000000 
000340 000342 
000000 
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“ADDRESS OF NEXT 
31F HALTED HERE, 
ADDRESS OF NEXT 
;1F HALTED HERE, 
ADDRESS OF NEXT 
:1F HALTED HERE, 


PREVIOUS 


PREVIOUS 


PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 


O PREVIOUS 
O PREVIOUS 


PREVIOUS 
PREVIOUS 
PREVIOUS 


O PREVIOUS 


LOCATION 
TRAPPED TO 


PREVIOUS 
PREVIOUS 
PREVIOUS 
PREVIOUS 


SEQUENCE 


ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 


15 
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000344 000346 «WORD .+2 ;ADDRESS OF NEXT LOCATION 
000346 000000 HALT ;IF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000350 000352 WORD .+2 sADDRESS OF NEXT LOCATION 
000352 000000 HALT 7IF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000354 000356 WORD #2 ;ADDRESS OF NEXT LOCATION 
000356 000000 HALT 7I1F HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000360 000362 «WORD .+2 sADDRESS OF NEXT LOCATION 
000362 000000 HALT 7IF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 

000366 «WORD .+2 ADDRESS OF NEXT LOCATION 
000366 000000 HALT ;1F HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000370 000372 «WORD .+2 sADDRESS OF NEXT LOCATION 
000372 000090 HALT 7IF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 


000374 000376 «WORD .+2 ADDRESS OF NEXT LOCATION 
000376 000000 HALT yI1F HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
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381 
382 000200 


| 384 000210 
= 000214 


86 
387 


000046 
000052 


ae 
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.=200 

000510 mp BEGIN 

000306 CLR $PASS 

000510 JMB, BEGIN 


.=30 
.SBTTL ACT11 HOOKS 
TEE IE SIE IEEE TOIEIEISIIOIEISIIOOIEIIOIIOISISISIIOIEISISIISIEIEIEITIEITITIOI ITT I TTT TOIT TI 
;HOOKS REQUIRED BY ACT11 
$SVPC=. SAVE PC 


-=4 

on see 331)SET LOC.46 TO ADDRESS OF $SENDAD IN .$EOP 
-WORD 0 322)SET LOC.52 TO ZERO 

.=$SVPC 33 RESTORE PC 


17 
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APT MAILBOX~E TABLE 


389 


000330 


— == 
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2 
SEQUENCE 


.SBTTL APT MAILBOX-ETABLE 


SRE EERE RR EER EERE EEE ERE REAR EE ES 


.EVEN 


;;APT MAILBOX 

3 sMESSAGE TYPE CODE 

3;FATAL ERROR NUMBER 
; TEST NUMBER 


zs T NUMBER 
::MESSAGE ADDRESS 
ae en LENGTH 

;APT ENVIRONMENT TABLE 


E 
2s ENV VIRONMENT MODE BITS 
3;APT SWITCH ~ Spaces 


rh 
bits vate be =CPU T 
11/04=01, "1 /05= 02,11/20=03,11/40=04 ,11/45=05 
11770206. ‘PDQ=07,0=10 
O=REAL TIME CLOCK 
9=FLOATING POINT PROCESSOR 
8=MEMORY MANAGEMENT 


18 


2 
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APT PARAMETER BLOCK 
391 .SBTTL APT PARAMETER BLOCK 


TIES EISISISISIEISISIIOI SISSIES IIEIIIIIISISIIISIIOIOIOOIDIIIIDIDISIONIOISISIISIIOOIDIOIEIISITITIEITIEITINIIOIE 


“SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 
TEASE OI IOI ISISISISIOIIISISISISIEISIITISIOEIOIIIIOISIIIIIDIIIOIOIIOIOI IIIT ITA AIA IAI AAI IAI IISA ATE 
000330 ‘SKE. 3: SAVE CURRENT LOCATION 
000024 .=2 [SET POWER FAIL TO POINT TO START OF PROGRAM 
000024 000200 200 S:FOR APT START UP 
060044 -=44 | ::POINT TO APT INDIRECT ADDRESS PNTR. 
000044 000330 $APTHDR ::POINT TO APT HEADER BLOCK 
000330 -=.$X  ::RESET LOCATION COUNTER 
LRA RRA EERE EERE ERE REAR AERRE RR ER EER REE ERE R ERE EERE 
“SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
j INTERFACE SPEC. 


000330 
000330 $HIBTS: .WORD 0 ;TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 
: SMAIL : TADDRESS OF APT Set seat (BITS 0-15) 
000 000005 $TSTM: .WORD 5 3;RUN TIM OF LONGEST T 
000336 000005 $PASTM: .WORD 5 — TIME IN SECS. OF ist PASS ON 1 UNIT (QUICK VERIFY) 
000340 000000 SUNITM: .WORD 0 DITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
G00342 000014 . WORD SETEND~SHAIL/2 3;LENGTH MAILBOX-E TABLE (WORDS) 


88 
S 
Si 
S 
3 
a 


Qa Oe ee eee SO Or 
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APT PARAMETER B:.0CK : 
393 000304 $TSTNM=$TESTN 
phe: 060302 SERROR=$FATAL 
96 000500 -=500 
900500 000000 BUFF: .WORD 0 
RCPUER: .WORD 0 
KTVEC: .WORD 250 
KTSTA: .WORD 252 
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APT PARAMETER BLOCK 


401 000510 012706 000500 BEGIN: MOV #500, SP 
402 000514 012737 177777 023070 MOV —s #=1, PASSPT 
403 000522 023737 000042 023042 CMP —s- 42, SENDAD 
404 000530 001403 BEQ —RESTRT 
405 000532 004737 023510 JSR —- PC, PRTMSG 
406 000536 023300 WORD ‘TITLE 

407 000540 005037 000300 RESTRT: CLR —- SMSGTY 
408 000544 012706 0005 MOV «#500, R6 
409 000550 012737 023424 000024 MOV —«s #PWRDWN, 24 
410 000556 012737 000340 000026 MOV = #340,26 
411 000564 012737 000006 000004 MOV = #64 

412 000572 005037 000006 CLR «6 

413 000576 012737 000012 000010 Mov —s- #1210 
414 000604 005037 000012 CLR 12 

415 000610 005037 000304 CLR $TSTNM 
416 000614 003037 000302 CLR $ERROR 
417 000620 012702 000300 MOV —- #SMSGTY,R2 
418 000624 000412 BR TST1 


2 


SEQUENCE 


SET UP STACK POINTER 

;CLEAR THE ITERATION COUNTER 

7 SEE A TITLE MESSAGE SHOULD BE PRINTED 
[BRANCH AROUND MESSAGE PRINTING IF SO 
:GO PRINT MESSAGE USING 

;STARTING ADDRESS OF THIS MESSAGE 


SET UP THE POWER DOWN VECTOR 
ZSET UP POWER DOWN PRIORITY 
SET UP TRAP VECTORS 4 & 6. 


21 


—— 
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APT PARAMETER BLOCK 


430 6 
431 000650 


000000 
000000 
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J 2 


SPECIAL CASE OF ODD;.EVEN .BYTE AND REGISTER 6 
HERE=0 


joleleleleal a) 


oo 
wn 
mr 
aw 
oN 
ou 


oo 


SEQUENCE 


22 
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432 
032737 000001 
001410 
012737 000177 
000000 
042737 000001 
000304 
000001 
000137 001220 
005006 
434 000724 112637 000000 
20627 000002 
000001 


001000 
114627 000000 
0627 000776 


000002 


000004 
000003 


000002 
012737 000004 


453 
454 001052 


177766 
000302 


177766 


000304 


000302 


000302 


000302 


000302 


kK 2 
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TEST #1 = TEST AUTO INC AND DEC OF R6 FOR WORD AND BYTES 


.SBTTL TEST #1 = TEST AUTO INC AND DEC OF R6 FOR WORD AND BYTES 


{RAR AERA RARER RARE TAA AA RAR AR AERA RARER ERAEEREERERARARERERERR ARERR ES 


STEST 1 = TEST AUTO INC AND DEC OF R6 FOR WORD AND BYTES 


Nee LL LLL Ll blellalalaladalehabelebabalalaiabetale 


7 SEE Ml BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 


TST1: 


100$: 


10008: 


1$: 


2$: 


3$: 


#1, CPUERR 
100$ 
#177, $F ATAL 
(R2) 

#1, CPUERR 
$TESTN 
#1,$TESTN 
1000$ 
TST2=12 

R6 
(R6)+,HERE 
R6,A2 


1$ 
#1,SFATAL 


(R2) 


#1000,R6 
=<) AHERE 
6.4776 


Bs" 
#2, $F ATAL 


(R2) 


R6 
(R6) +, (R6)+ 
R6,44 


#3, SFATAL 


(R2) 


R6 

R4 

(R6)+, (R4)+ 
R6,42 


4$ 
#4, $FATAL 
(Re) 


R6 


AROUND CLEAR AND HALT IF CLEAR 


SEQUENCE 


POWER MONITOR FATAL # TO $FATAL 


{MOV E SPECIAL 
SSET MSGTYP TO FATAL ERROR 
: FOUND SFT 


[UPDATE TEST NUMBER 


; SEQUENCE ERROR? 
; JUMP TO ERROR HALT ON SEQ ERROR 


SIX SHOULD INCREMENT BY TWO 


REKKKKK 


MOVE TO MAILBOX # eeeeeee 7 
;SET MSGTYP TO FATAL ERROR 
:R6 DID NOT AUTO INCREMENT BY TWO 
7TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 764 


;SHOULD DECREMENT BY TWO 


REE 


MOVE TO MAILBOX # **eeex 2 
SET MSGTYP TO FATAL ERROR 

[R6 DID NOT AUTO DECREMENT BY 2 
TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 750 


;DOUBLES AUTO INCREMENT OF R6 


Rekkeee 


MOVE TO MAILBOX # seexxee 3 

:SET MSGTYP TO FATAL ERROR 
WRONG AUTO INCREMENT OF R6 

[TO SCOPE REPLACE HALT WITH 240 

TAND REPLACE NEXT INST WITH 736 


TEST INCREMENT OF R6 


RRaREEE 


MOVE TO MAILBOX # sexxeee 4 
SET MSGTYP TO FATAL ERROR 
[WRONG INCREMENT OF R6 

7TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 723 


[BRANCH OVER ERROR HALT ON aook ERROR JUMP IF OK 


23 
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TEST #1 = TEST AUTO INC AND DEC OF R6 FOR WORD AND BYTES 


[ 










455 001054 005004 CLR RG 
456 001056 122426 (MPB —s-_ (RG) +, (R6) + ;TEST INCREMENT OF R6 
457 001060 020627 000002 CMP R6,42 
458 001064 001405 BEQ 5$ 
001 012737 000005 000302 MOV #5, SFATAL sMOVE TO MAILBOX # *#exee 5 xennnne 
001074 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
001076 HALT ‘WRONG INCREMENT OF R6 
“TO SCOPE REPLACE HALT WITH 240 
. SAND REPLACE NEXT INST WITH 710 
460 001100 005006 S$: CLR R6 
461 001102 005004 CLR RG 
462 001104 122624 CMPB ss. (R6) +, (RG) + sTEST INCREMENT OF R4 
463 001106 020427 000001 CMP R4,A1 
464 001112 001405 BEQ 6$ 
001114 012737 000006 000302 MOV #6, $FATAL MOVE TO MAILBOX # *#eekee 6 teeeeen 
001122 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
001124 HALT ‘WRONG INCREMENT OF R4& 
“TO SCOPE REPLACE HALT WITH 240 
a ‘AND REPLACE NEXT INST WITH 675 
466 001126 005006 6$: CLR R6 
467 001130 005004 CLR RG 
468 001132 122426 CMPB —s- (RG) +, (R6) + : TEST INCREMENT OF R6 
469 001134 020627 000002 CMP R6,A2 
470 001140 001405 BEQ 7$ 
001142 012737 000007 000302 MOV #7, $FATAL SMOVE TO MAILBOX # *teeee 7 xeweeee 
001150 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
001152 HALT “WRONG INCREMENT OF R6 
‘TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 662 
472 001154 005006 7$: CLR R6 
473 001156 005004 CLR R4 
474 001160 122426 CMPB —s-« (RG) +, (R6) + :TEST INCREMENT OF R4 
475 001162 020427 000001 CMP R41 
476 001166 001405 BEQ 8$ 
001170 012737 000010 000302 MOV #10, $FATAL :MOVE TO MAILBOX # *eexexe 10 seeenen 
001176 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
001200 HALT ‘WRONG INCREMENT OF R4 
*TO SCOPE REPLACE HALT WITH 240 
a SAND REPLACE NEXT INST WITH 647 
478 001202 012706 001000 8$: MOV #1000,R6 
479 001206 124627 000000 CMPB —s- = (R6) . AHERE : TEST DECREMENT OF R6 
480 001212 022706 000776 CMP #776,R6 
481 001216 001405 BEQ,  TST2 
001220 012737 000011 000302 MOV #11, $FATAL :MOVE TO MAILBOX # *eeexee 1] xeeeeee 
001226 005212 INC (R25 ;SET MSGTYP TO FATAL ERROR 
001230 HALT G DECREMENT OF R6,0R WRONG $TSTNM 


ON 
:TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 635 


M 2 


CKKABCO 11/44 TRAPS MACRO M1113 wae 12:47 PAGE 23 SEQUENCE 
TEST #2 = TEST TRANSFER OF .BYTE USING 
482 .SBTTL TEST #2 = TEST TRANSFER OF .BYTE USING R6 


peerrererterirtrrititiititititititiittiiitite ee 


STEST 2 = TEST TRANSFER OF .BYTE USING R6 


Pererreerrr Terra rrrrrrrrerrrrrrrrrrrrrrTrrri TT Tit ti ttt tii titi iti ii iti ii 


001232 032737 00000. 177766 TsT2: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
001240 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
001242 012737 000177 000302 MOV #177, $FATAL ‘MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
001250 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
001252 000000 HALT :CPU POWER BIT F SE 
001254 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
001262 005237 000304 100$: INC $TESTN ‘UPDATE TEST NUMBER 
001266 022737 000002 000304 CMP #2, $TESTN ‘SEQUENCE ERROR? 
001274 001402 BEQ 1000$ “BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
001276 000137 001600 JMP TST3-12 : JUMP TO ERROR HALT ON SEQ ERROR 
001302 1000$: 
483 001302 012737 123456 000636 MOV #123456,K5 
484 001310 012737 050505 000626 MOV #050505,K1 
485 001316 012705 000626 MOV #K1,R5 :R5=(050505)K1 
486 001322 012706 000636 MOV #KS RO *R6=(123456)K5 
487 001326 112625 MOVB _— (R6) +, (R5) + ‘LOW .BYTE OF R6 TO RS 
488 001330 022737 050456 000626 CMP #050456,K1 
489 001336 001405 BEQ 1$ 
001340 012737 000012 000302 MOV #12, $F ATAL sMOVE TO MAILBOX # *kexeee 12 xeeeeee 
001346 005212 INC (R25 “SET MSGTYP TO FATAL ERROR 
001350 000000 HALT “FALSE TRANSFER OF .BYTE 


7TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 753 


490 

491 001352 012737 123456 000636 1%: MOV #123456,K5 

492 001360 012737 050505 000626 MOV #050505 ,K1 

493 001366 012705 000626 MOV #K1,R5 aie fs ie 

494 001372 012706 000640 MOV #K6,R6 7R6(123456)K 

495 001376 114625 MOVB —(R6) , (R5)+ ;LOW .BYTE OF R6 TO R5 (DECREMENT) 

496 001400 023727 000626 050456 CMP - K1,4050456 

497 001406 001405 BEQ 
001410 012737 000013 000302 MOV #13, $FATAL MOVE TO MAILBOX # *eeexee 15 teeeeee 
001416 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
001420 000000 HALT [FALSE R6 .BYTE TRANSFER 

7TO SCOPE REPLACE HALT WITH 240 

498 ZAND REPLACE NEXT INST WITH 727 

499 001422 012737 123456 000626 2$: MOV #123456,K1 

500 001430 012737 050505 000636 MOV #050505 ,K5 

501 001436 012705 000626 MOV #K1,R5 3 (123456) 

502 001442 012706 000636 MOV #K5S ,R6 3 (050505) 

503 001446 112526 MOVB (R5)+, (R6)+ ;LOW OF RS TO LOW OF R6 

504 001450 022737 050456 000636 CMP #050456,k5 

505 001456 001405 BEQ 3$ 
001460 012737 000014 000302 MOV #14, $FATAL 7MOVE TO MAILBOX # *eeeeee 140 BeeEEER 
001466 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
001470 000000 HALT ZFALSE R6 .BYTE TRANSFER 


506 
507 001472 


012737 123456 000626 3$: MOV #123456.K1 
508 001500 012737 050505 000636 MOV #050505 KS 
509 001506 012705 000627 MOV 1,R5 1123456 





25 


CKKABCO 11/44 TRAPS 


TEST 


#2 = TEST TRANSFER 


VWAVUIVIVIVT 
6 ee ee ee ee ee ee 
COOONAUS 


570 
521 001576 
001600 


001606 
0601610 


MACRO M1113 ra 12:47 PAGE 23-1 
OF .BYTE USING R 


000636 MOV #KS,R 
MOVB onahen (R6) + 
000636 050647 CWP K5 ,4050647 
000015 000302 MOV #15, $FATAL 
INC (R25 
HALT 
123456 000626 4$: MOV #123456,K1 
050505 000636 MOV #050505.K5 
00627 MOV #K1+1,R5 
000636 MOV #K5 RO 
MOVB {Ross (R5)+ 
042456 000626 CMP #0420456, k1 
000016 000302 MOV #16,$FATAL 
iNC (R25 
HALT 


SEQUENCE 26 


050505 


‘HIGH OF R5 TO LOW OF R6 


REKKKEKE 


MOVE TO MAILBOX # *eeeeee §=15 
;SET MSGTYP TO FATAL ERROR 
TFALSE R6 .BYTE TRANSFER 

3TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 657 


3R5-123456-ODD ADDRESS 
[R6-050505--.EVEN ADDRESS 
sLOW OF R6 TO HIGH OF R5 


RKKKKKEK 


;MOVE TO MAILBOX # *xxxxe 16 

+74 MSGTYP TO FATAL ERROR 
AILED LOW OF 6 TO HIGH OF 5,0R WRONG STSTNM 

at SCOPE REPLACE HALT WITH 240 

TAND REPLACE NEXT INST WITH 633 





522 


523 001 
524 


531 

532 001750 

533 001756 
001760 
001766 
001770 


534 001772 
535 002000 
002002 


2022 
002024 


CKKABCO 11/44 TRAPS 
TEST #3 = TEST BYTE OPERATION WITH SEQ ODD-EVEN ADDRESS 


032737 
0 


123737 
001405 
012737 
005212 
000000 


123737 
001405 
012737 
005212 
000000 


123737 
001005 
012737 


MACRO M1113 23-APR=-81 12:47 PAGE 24 


002070 
000642 
000017 


000643 
000020 


000645 
000021 


. 000644 


000022 


000643 
000023 


000644 
000024 


177766 
000302 


177766 
000304 


000643 
000302 


900642 
000302 


000642 
000302 


000640 
000302 


000645 
000302 


000645 
000302 


SEQUENCE 


.SBTTL TEST #3 = TEST BYTE OPERATION WITH SEQ ODD-EVEN ADDRESS 


DIESE ESSERE EIEIO SUIS ITI IOI TIRE EERE ES 


:TEST 3 = TEST BYTE OPERATION WITH SEQ ODD-EVEN ADDRESS 


SII OIOI IOI IIIS III IOSD IDOI IIIOISISIOIOIOIISIIUIDIOIUIII IODC IUIDIIOIUIININIOI IE 


TST3: 


100$: 


1000$: 


5$: 


6$: 


78: 


8$: 


9$: 


#1, CPUERR 
100$ 
#177, $F ATAL 
(R2) 
#1, CPUERR 
$TESTN 
a3. $TESTN 
1000$ 
TST4=-12 
K7,K7+1 

$ 


#17,$FATAL : 
(R2) 


k7+1 .k7 
#20,$FATAL 
(R2) 


K10+1,K7 
7$ 

#21, $FATAL 
(R2) 


cme 
#22, $FATAL 
(R2) 


K7+1,K10+1 
#23, $FATAL 
(R2) 


K10,K10+1 
10$ 
#24 ,SFATAL 


;MOVE TO MAILBOX # 


:SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
[BRANCH AROUND CLEAR AND HALT IF CLEAR 
TMOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
:SET MSGTYP TO FATAL ERROR 
CPU POWER BIT FOUND SET 
;CLEAR THE BIT MBER SET 


SEQUENCE ERROR 
SBRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
; JUMP TO ERROR HALT ON SEQ ERROR 


7SAME .WORD LOW TO HIGH 


KEKKKKH 


MOVE TO MAILBOX # xxxxexe 17 
SET MSGTYP TO FATAL ERROR 
ZSHOULD COMPARE LOW TO HIGH 

3TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 766 


COMPARE ODD TO .EVEN SAME .WORD 


REKKEEKE 


MOVE TO MAILBOX # **xxeee 20 
;SET MSGTYP TO FATAL ERROR 
Z0DD TO .EVEN .BYTE FAILURE 
:T0 SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 755 


SEQUENTIAL .BYTES 


KKKKKKK 


MOVE TO MAILBOX # *xxxeex = 21 
;SET MSGTYP TO FATAL ERROR 

[ODD TO .EVEN FAILED 

[TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 744 


KEKKEKKK 


MOVE TO MAILBOX # ***xeee 22 
#SET MSGTYP TO FATAL ERROR 
;.EVEN TO EVEN FAILED 

[TO SCOPE REPLACE HALT WITH 240 

ZAND REPLACE NEXT INST WITH 735 


REKKEKK 


sMOVE TO MAILBOX # **xxxee 23 
;SET MSGTYP TO FATAL ERROR 

[ODD TO ODD FAILED 

3TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 722 


keekeee 24 kekekee 


27 


— 11/44_TRAPS 


002032 
002034 


540 002036 
541 002044 
002045 





000645 
000025 


000644 
000026 


000645 
000302 


000643 
000302 


MACRO M1113 23-APR=-81 12:47 PAGE 24-1 
#3 = TEST BYTE OPERATION WITH SEQ ODD-EVEN ADDRESS 


INC 
HALT 


SEQUENCE 28 


SET MSGTYP TO FATAL ERROR 
[LOW TO HIGH IN SAME .WORD FAIL 
TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 711 


ED 


;MOVE TO MAILBOX # *eeeeee 25 KeeKREe 
;SET MSGTYP TO FATAL ERROR 

THIGH TO LOW IN SAME .WORD FAILED 

;TO SCOPE REPLACE HALT WITH 240 

TAND REPLACE NEXT INST WITH 700 


sMOVE TO MAILBOX # *eeeKKe 26 kek KRER 
+ SET MSGTYP TO FATAL ERROR 
;.EVEN TO ODD FAILED,OR WRONG $TSTNM 
710 SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 667 







dD 3 
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TEST #4 = TEST THE CC BITS 


545 .SBTTL TEST #4 = TEST THE CC BITS 
RRR ERA EEE ERE RARER REE ER ERR REAR AERA EERE ARERR AREA EH 
“TEST 4 = TEST THE CC BITS 
Perr rererrrer rere rrrrerrrrr rT TTT TTT TTT TTT itt titi iii iti tee tee eS 
002102 032737 000001 177766 TST4: BIT #1, CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
002110 001410 BEQ 100$ ANCH AROUND CLEAR AND HALT IF CLEAR 
002112 012737 000177 000302 MOV #177, $F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
002120 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
002122 000000 HALT [CPU POWER BIT FOUND SET 
002124 042737 000001 177766 BIC #1, CPUERR [CLEAR THE BIT FOUND SET 
002132 005237 000304 100$: INC $TESTN [UPDATE TEST NUMBER 
2136 022737 000004 000304 CMP #4, $TESTN SEQUENCE ERROR? 
002144 001062 BNE TST5-12 BRANCH TO ERROR HALT ON SEQ ERROR 
546 002146 277 SCC SET STATUS 
547 002150 005037 177776 CLR STATUS [CLEAR STATUS 
548 002154 103005 BCC 1$ 
002156 012737 000027 000302 MOV #27, SFATAL :MOVE TO MAILBOX # sexes 27 eeeenes 
002164 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
002166 000000 HALT =C NOT CLEAR 
[TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 766 
549 002170 1$: 
002170 102005 BVC 2$ 
002172 012737 000030 000302 MOV #30, $FATAL ;MOVE TO MAILBOX # *txxeee 30 xxeenee 
002200 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
002202 00000 HALT :V NOT CLEAR 
:TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 760 
550 002204 28: 
002204 001005 BNE 3$ 
02206 012737 000031 000302 MOV #31,SFATAL :MOVE TO MAILBOX # *eeeeee 3] exeenee 
002214 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
002216 000000 HALT :Z NOT CLEAR 
[TO SCOPE REPLACE HALT WITH 240 
[AND REPLACE NEXT INST WITH 752 
551 002220 38: 
002220 100005 BPL 4$ 
002222 012737 000032 000302 MOV #32, $FATAL ;MOVE TO MAILBOX # *eexeee 32 xeennne 
002230 005212 INC (RO) SET MSGTYP TO FATAL ERROR 
002232 000000 HALT N NOT CLEAR 
[TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 744 
552 002234 000257 4$: ccc “CLEAR CONDITION CODES 
553 002236 052737 000017 177776 BIS #17, STATUS SSET STATUS TO ONES 
555 002244 103405 BCS 5$ 
002246 012737 000033 000302 MOV #33, SFATAL :MOVE TO MAILBOX # *texexe 33 weeenes 
002254 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
002256 000000 HALT T SET 
[TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 732 
556 002260 5$: 
002260 102405 BVS 6$ 
002262 012737 000034 000302 MOV #34, SFATAL :MOVE TO MAILBOX # *exeeee 34 weeeene 
002270 005212 INC (R25 





7 SET ag hg TO FATAL ERROR 


V_NOT SE 
Yo SCOPE REPLACE HALT WITH 240 


E 3 
CKKABCO 11/44 TRAPS MACRO M1113 23-APR=81 12:47 PAGE 25-1 SEQUENCE 
TEST #4 = TEST THE CC BITS 





zAND REPLACE NEXT INST WITH 724 


557 002274 . 6$: 
002274 001405 BEQ 7$ 
002276 012737 000035 000302 MOV #35, SFATAL MOVE TO MAILBOX # xeaeeee 35 xeeeeee 
002304 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
002306 000000 HALT :Z NOT SET 
7TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 716 
558 002310 7$: 
002310 100405 BMI TS75 
002312 012737 000036 000302 MOV #36, $FATAL MOVE TO MAILBOX # **teeeee 36 tHe EHe 
002320 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
002322 000000 HALT N NOT SET,OR WRONG $TSTNM 


To SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 710 


30 


Gs Lar Gee eas ar eae 


CKKABCO 11/44 TRAPS MACRO M1113 23-APR=-81 12:47 PAGE 26 SEQUENCE 
TEST #5 = TEST THAT A TRAP OCCURS ON A RESERVED INS 
559 .SBTTL TEST #5 = TEST THAT A TRAP OCCURS ON A RESERVED INS 
errr ter L dL ddd dell telalalalalalalalalalaieleieieieieieieieieieiela 
:TEST 5 = TEST THAT A TRAP OCCURS ON A RESERVED INS 
PrerrrerrrrrrrrrTTTTTTTT TT TTT TTT TTT iT ttt tet iti hh hk he 2D eS 
002324 032737 000001 177766 TsT5: BIT #1 ,CPUERR SEE IF BIT 0 OF CPUERR (POWER ey the BIT) IS SET 
002332 001410 BEQ 100$ ZBRANCH AROUND CLEAR AND HALT IF CLEAR 
002334 012737 000177 000302 MOV #177, SFATAL [MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
002342 005212 INC (R2) 7SET MSGTYP TO FATAL ERROR 
002344 000000 HALT :CPU POWER BIT FOUND SET 
002346 042737 000001 177766 BIC #1, CPUERR [CLEAR THE BIT FOUND SET 
002354 005237 000304 100$: INC STESTN ; UPDATE TEST NUMBER 
002360 022737 000005 000304 CMP #5, $TESTN SEQUENCE ERROR? 
002366 001006 BNE 1$ “BRANCH TO ERROR HALT ON SEQ ERROR 
560 002370 012706 000500 MOV BUFF , SP ; STACK ats SETUP 
561 002374 012737 002416 000019 MOV #2$,RTRAP ;RETURN LOCATION 
43 et 000010 - TRAPA RESERVED INSTRUCTION, SHOULD TRAP 
002404 012737 000037 000302 MOV #37 ,SFATAL ;MOVE TO MAILBOX # *exeene 37) xeeenne 
002412 005212 iNC (R2) sSET MSGTYP TO FATAL ERROR 
602414 000000 HALT SRESERVE INSTRUCTION DIDN'T TRAP,OR WRONG $TSTNM 
TO SCOPE REPLACE HALT WITH 240 


[AND REPLACE NEXT INST WITH 764 
564 002416 2$: 


31 


oo CKKABCO 11/44 TRAPS 
TEST #0 


565 


oe an 
410 


000001 
000177 
000001 
000304 
000006 
000500 
002476 
000474 
000040 


177766 
000302 


177766 
000304 


000010 


000302 


. SBTTL 


TST6: 


100$: 


MACRO M1113 23=APR=-81 12:47 PAGE 27 
- TEST DEC OF STACK POINTER ON A TRAP OPERATION 


SEQUENCE 


TEST #6 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


TEBE SEES IE I OEIIEIEIEIEISEIE EIS SIIUIIIOISIISOIIEIEIEIIOOEEIEITIIOUOUIEI Ie teat e 


‘TEST 6 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


SOCIO IOUS ICIS IIIS IE IO IU IOI IDOI IOIOIIUIIUIIIOIIUIIOI ITO on tit tt 


BIT 


#1,CPUERR 

100$ 

#177, SFATAL 

(R2) 

#1, CPUERR 
ESTN 

#6,$TESTN 

TST7-12 


BUFF ,SP 
#1$,RTRAP 


SP ,ABUF F-4 
TST7 
#40, $FATAL 
(R2) 


Sad 
“ 


SEE IF BIT 0 OF CPUERR (POWER ge BIT) IS SET 
ZBRANCH AROUND CLEAR AND HALT IF CLEAR 
[MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
2 SET MSGTYP TO FATAL — 
;CPU POWER OUND 


ZSEQUENCE ERROR? | 
:BRANCH TO ERROR we! ON SEQ ERROR 
: STACK POINTER SET 
;RETURN POINTER 
SRESERVED INSTRUCTION 
TEST DECREMENT OF SP 


MOVE TO MAILBOX # *x*xeee 40 
7SET MSGTYP TO FATAL ERROR 

[NOT DECREMENTED TWO WORDS,OR WRONG $TSTNM 
TO SCOPE REPLACE HALT WITH 240 

TAND REPLACE NEXT INST WITH 761 


REKKEKE 


32 


[a nn nn 


H 
| CKKABCO 11/44 TRAPS MACRO seh? SP Bh atest 12:47 PAGE 28 SEQUENCE 
TEST #7 = TEST THAT PROPER P.C. 
571 .SBTTL TEST #7 = TEST THAT PROPER P.C. IS SAVED 
[Ree RRR ARARARERERRA AEE EE TEAR AAA RA ERAAAA RATER RER ARATE AAA Ree ee RAAT 
STEST 7 = TEST THAT PROPER P.C. IS SAVED 
POPTTTTTT TTT ITT T ITT TTL LLL iT odio) 
002516 032737 000001 177766 TST7: BIT #1,CPUERR SEE IF BIT O OF CPUERR (POWER MONITOR BIT) IS SET 
002524 001410 BEQ 100$ [BRANCH AROUND CLEAR AND HALT IF CLEAR 
002526 012737 000177 000302 MOV #177,$F ATAL MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 
002534 005212 INC (R2) 7SET MSGTYP TO FATAL ERROR 
002536 000000 HALT ;CPU POWER BIT FOUND SET 
002540 042737 000001 177766 BIC #1,CPUERR [CLEAR THE BIT FOUND SET 
002546 005237 000304 100$: INC STESTN [UPDATE TEST NUMBER 
002552 022737 000007 000304 CMP #7, STESTN ; SEQUENCE ERROR? 
002560 001012 BNE TST10-12 ;BRANCH TO ERROR HALT ON SEQ ERROR 
572 002562 012706 000500 MOV #BUFF SP 7 STACK POINTER SETUP 
573 002566 012737 002576 000010 MOV #1$ .RTRAP ;RETURN FROM TRAP POINTER 
574 002574 000010 TRAPA TRAP ON THIS INSTRUCTION 
575 002576 022737 002576 000474 1%: CMP #1$ ,BUFF <4 ZCHECK FOR INCREMENTED P.C. 
576 002604 001405 BEQ TST10 
002606 012737 000041 000302 MOV 441, $FATAL sMOVE TO MAILBOX # seeeeee 4] teeeene 
602614 005212 INC (R25 ;SET MSGTYP TO FATAL ERROR 
002616 000000 HALT S INCORRECT P.C.,.0R WRONG $TSTNM 


TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 760 





CKKABCO 11/44 TRAPS 
TEST #10 = TEST THAT ‘OLD’ CC AND PRI ARE PLACED ON STACK 


MACRO M1113 23-APR=-81 12:47 PAGE 29 SEQUENCE 


- §77 .SBTTL TEST #10 = TEST THAT ‘OLD’ CC AND PRI ARE PLACED ON STACK 
patella aint 
S TEST 10 = TEST THAT ‘“‘OLD’’ CC AND PRI ARE PLACED ON STACK 
PrerrrrrrrererrT Te TT TT TTT TTITITI LITT TL TLL LLL LLL 
002620 032737 000001 177766 TST10: BIT #1,CPUERR : SEE IF BIT O OF CPUERR (POWER MONITOR BIT) IS SET 
C02626 001410 BEQ 100$ (CH AROUND CLEAR AND HALT IF CLEAR 
002630 012737 000177 000302 MOV #177, SF ATAL “MOV VE SPECIAL POWER MONITOR FATAL # TO SFATAL 
002636 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
002640 HALT ;CPU POWER BIT FOUND SET 
00 042737 000001 177766 BIC #1,CPUERR = CLEAR THE BIT FOUND SET 
002650 005237 000304 100$: INC STESTN SUPDAT E TEST NUMBER 
0026 022737 000010 000304 CMP #10, $TESTN s SEQUENCE ERROR? 
002 001040 BNE TST11-12 ;BRANCH TO ERROR HALT ON SEQ ERROR 
578 002664 2706 000500 MOV #BUFF SP ;SET UP 
579 0026 012737 002706 000010 MOV #1$,RTRAP ;SET UP 
580 002676 005037 177776 CLR cc ;CLEAR CC AND PRIORITY 
581 002702 257 ccc 
582 002704 1 TRAPA 7 TRAP 
583 002706 023727 000476 000000 1$: CMP BUF F=-2,40 ;TEST THAT OLD STATUS WENT TO STACK 
602714 001405 BEQ 2s 
002716 012737 000042 000302 MOV #42, $F ATAL sMOVE TO MAILBOX # *eeeeee 42 seeneee 
002724 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
002726 HALT “; INCORRECT STATUS 
:T0 SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 755 
585 002730 2706 000500 23: MOV #BUFF ,SP 3 UP 
0027 012737 002754 000010 MOV #3$, RTRAP 7SET UP 
587 002742 012737 000357 177776 MOV #357,CC ;SET PRIORITY 
588 002750 000277 SCC sSET CC 
589 002752 00001 TRAPA : 
590 002754 023727 000476 000357 3$: CMP BUF F-24357 : COMPARES STATUS ON STACK 
591 002762 001405 BEQ TST11 
0027 012737 000043 000302 MOV #43, $F ATAL sMOVE TO MAILBOX # seeeeee 43 eeennne 
oe 005212 _. (R2) :SET MSGTYP TO FATAL ERROR 
L 


S INCORRECT STATUS ON STACK,OR WRONG $TSTNM 
TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 732 


Georeie piensa ee Sesniinongacunibebentiieintaand 
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592 


601 003132 


603 003154 
56 


604 003170 
605 003174 
606 003202 


CKKABCO 11/44 TRAPS 
TEST #11 = TEST THAT ‘NEW’ STATUS IS CORRECT 


0327 


37 





000045 


000046 


177766 
000302 


177766 
000304 


000010 


000302 


000302 


000302 


000302 


177776 
000302 


000010 
000012 


.SBTTL TEST #11 = TEST THAT ‘NEW’ STATUS IS CORRECT 


FE Lata i talels talalallabalattalalaletelalalatabalatelalalalehelabeieheiabeleieeiaieieias 
:TEST 11 = TEST THAT ‘NEW'’ STATUS IS CORRECT 
PPoerrerrrrrrrTrTTTTTiTitiTitiiiitiiii itt itt ddd 
2 SEE IF BIT O OF CPUERR (POWER MONITOR BIT) IS SET 
a H AROUND CLEAR AND HALT IF CLEAR 
SPECIAL POWER MONITOR FATAL # TO SFATAL 


ist]: 


1000$: 


_ 1$: 


23: 


3$: 


4$: 


5$: 


6$: 


#1, CPUERR 


100$ 
#177, SFATAL 
(R22) 


+17 STESTN 
1000$ 
12$ 


BUFF ,SP 
#1$,RTRAP 
RTRAP+2 


es 

#44 ,$FATAL 
(R2) 
3$ 

#45 ,,SFATAL 
(R2) 

4$ 
#46, $F ATAL 
(R2) 

5$ 

#47 ,SFATAL 
(R2) 


ome.ce 
#50, SFATAL 
(R2) 


#BUFF , SP 
#7$ ,RTRAP 


#357 RTRAP+2 


CLEAR THE BIT FOUND SET 


[UPDATE TEST NUMBER 
SEQUENCE ERROR? 


SEQUENCE 


[BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 


; JUMP TO ERROR HALT ON SEQ ERROR 


sMOVE TO MAILBOX # *#eene8 
:SET MSGTYP TO FATAL ERROR 
7N NOT CLEARED 

7TO SCOPE REPLACE HALT WITH 
+ AND REPLACE NEXT INST WITH 


sMOVE TO MAILBOX # *eeee8 
;SET MSGTYP TO FATAL ERROR 
3Z NOT CLEARED 

:TO SCOPE REPLACE HALT WITH 
+ AND REPLACE NEXT INST WITH 


sMOVE TO MAILBOX # *eeee88 
;SET MSGTYP TO FATAL ERROR 
:V NOT CLEARED 

;TO SCOPE REPLACE HALT WITH 
+ AND REPLACE NEXT INST WITH 


;MOVE TO MAILBOX # **xeKe8 
7SET MSGTYP TO FATAL ERROR 
:C NOT CLEARED 
[TO SCOPE REPLACE HALT WITH 
TAND REPLACE NEXT INST WITH 
TEST PRIORITY 


s;MOVE TO MAILBOX aenenne 
SET MSGTYP TO FATAL ERROR 
:PRIORITY NOT ZERO 

TO SCOPE REPLACE HALT WITH 
ZAND REPLACE NEXT INST WITH 


7SET NEW ‘'CC’* AND PRIORITY 


CLEAR FUTURE PRIORITY AND CC 
:TEST FOR °'C’’ CLEARED 


as 


240 
761 


45 


240 
753 


46 


240 
745 


47 


240 
737 


50 


240 
726 


eaekene 


eeeenee 


ageeeeee 


eeeakese 


keeeene 


35 


Bier Tee ong wes rs be ams 


a 





CKKABCO 11/44 TRAPS MACRO M1113 23-APR=-81 12:47 PAGE 30-1 SEQUENCE 36 
TEST #11 = TEST THAT "NEW STAGES IS CORRECT 
607 003210 000010 TRAPA ; TRAP HERE 
608 003212 7$: 
003212 100405 BMI 8$ 
003214 012737 000051 000302 MOV #51,$FATAL sMOVE TO MAILBOX # *eeenen 5] eeneens 
003222 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
003224 000000 HALT *N NOT SET 
‘TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 707 
609 003226 8S: 
00322 1405 BEQ 9$ 
003230 012737 000052 000302 MOV #52, $FATAL sMOVE TO MAILBOX # *eeexee 52 saeenne 
32 5212 INC (R2) 3SET MSGTYP TO FATAL ERROR 
003240 HALT T SET 
‘TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 701 
610 003242 9$: 
003242 102405 BvS 10$ 
003244 012737 000053 000302 MOV #53, $FATAL sMOVE TO MAILBOX # xeeexee 53 xennene 
003252 005212 iNC (R2) “SET MSGTYP TO FATAL ERROR 
003254 HALT :V NOT SET 
"TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 673 
611 003256 10$: 
003256 103405 BCS 11$ 
003260 012737 000054 000302 MOV #54, $FATAL sMOVE TO MAILBOX # *exxeee 54 seeneee 
3266 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
003270 HALT :C NOT SET 
‘TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 665 
612 003272 013706 177776 11$: MOV CC,SP 
613 003276 042706 000017 BIC #17,SP 
614 003302 022706 000340 CMP #340, SP 
615 003306 001405 BEQ 3$ 
003310 12$: 
003310 012737 000055 000302 MOV 455, $FATAL :MOVE TO MAILBOX # *#eeeee 55 xeeneen 
003316 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
003220 000000 HALT ‘PRIORITY WAS CHANGED,OR WRONG $TSTNM 
‘TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 651 
616 003322 012737 000012 000010 13$: MOV #12,10 
617 003330 005037 000012 CLR 12 


2 








CKKABCO 11/44 TRAPS MACRO M1113 23-APR~81 12:47 PAGE 31 SEQUENCE 


TEST #12 = TEST THAT A TRAP OCCURS FOR A ‘'TRAP’’ INSTRUCTION 
618 .SBITL TEST #12 - TEST THAT A TRAP OCCURS FOR A ‘'TRAP"’ INSTRUCTION 


{RRR RRRRR ERR AAR EEE R RE REA RE RRERERR REAR ER ERR EEE ERE RRR R REE EES 


:TEST 12 = TEST THAT A TRAP OCCURS FOR A ‘‘TRAP’’ INSTRUCTION 


A ES NSS | Snes 


SII OO IOI IIS ISI IIUIO III III nt ith htt tit tit 


003334 032737 000001 177766 TST12: BIT #1,CPUERR 7SEE IF BIT 0 OF CPUERR (POWER MONITOR BiT) IS SET 
003342 001410 BEQ 100$ BRANCH AROUND CLEAR AND HALT IF CLEAR 
3344 012737 000177 000302 MOV #177, $FATAL [MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 

003352 5212 INC (R2) 2 SET MSGTYP TO FATAL ERROR 

003354 HALT PU POWER BIT FOUND SET 

003356 042737 000001 177766 BIC #1, CPUERR ‘CLEAR THE BIT FOUND SET 

003 005237 000304 100$: INC $TESTN [UPDATE TEST NUMBER 

003370 022737 000012 000304 CMP aes STESTN ; SEQUENCE ERROR? 

003376 001013 BNE T13-12 BRANCH TO ERROR HALT ON SEQ ERROR 
619 0034 012737 000012 000010 MOV fie. 10 
620 003406 5037 000012 CLR 12 

1 003412 2706 000500 MOV BUFF , SP : STACK fri SETUP 
622 003416 012737 003440 000034 MOV #1$,RTRAP1 ;RETURN LOCATION 
623 003424 400 TRAP RESERVED ore ge SHOULD TRAP 
4 003426 012737 000056 000302 MOV #56,$FATAL SMOVE TO MAILBOX aeeekee 56 ketene 
003434 5212 INC (R2) sSET MSGTYP TO FATAL ERROR 
003436 HALT ; TRAP N'T TRAP,OR WRONG STSTNM 
[TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 757 

625 003440 1$: 


' 
; 
(— 
















626 


627 
631 003524 
003526 


003534 
003536 
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032737 


000500 
003520 
000474 
000057 


177766 
000302 


177766 
000304 


000034 


000302 


MACRO M1113 23-APR-81 12: aa PAGE 32 
TEST #13 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 





SEQUENCE 38 


.SBTTL TEST #13 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


HAAS IIOIIOIIIOISIIOIIIEINIEI IOI ICICI TOR IOI ITAA IAI ASIST IAI IAI AS SAS AS SASSI IAS A IAT 


:TEST 13 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


SII IOI III III III IOI ITO ORI IOI TOI RIOT IOI RIA AAAASIAISISAIASSIAIASISSS ISSA 


TST13: 


100$: 


1$: 


#1, CPUERR 
100$ 

#177, SFATA 
(R2) 


faa 


eater on 
ii STESTN 
TST14-12 
MBUFF ,SP 
#1$,RTRAP1 
SP ,ABUF F -4 


TST 
#57, SFATAL 
(R2) 


+SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
CH AROUND CLEAR AND HALT IF CLEAR 

“MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 

:SET MSGTYP TO FATAL ERROR 


SEQUENCE ERROR? 
;BRANCH TO ERROR HALT ON SEQ ERROR 
7 STACK POINTER SETUP 
;RETURN POINTER 
;RESERVED INSTRUCTION 
TEST DECREMENT OF SP 


sMOVE TO MAILBOX # *kexeee 57 KeRKREE 
SET MSGTYP TO FATAL ERROR 

[NOT DECREMENTED TWO WORDS,OR WRONG $TSTNM 
TO SCOPE REPLACE HALT WITH 240 

ZAND REPLACE NEXT INST WITH 761 


CKKABCO 11/44 TRAPS 


TEST #14 = TEST THAT PROPER P.C. IS SAVED 


632 


032737 
0 


MACRO M1113 23-APR=81 12:47 PAGE 33 SEQUENCE 


000001 
000177 


000001 
000304 
000014 
000500 


003620 
003620 


000060 


177766: 


000302 


177766 
000304 


000034 
000474 
000302 


.SBTTL TEST #14 = TEST THAT PROPER P.C. IS SAVED 


LR EERE RRR EERE AREER ERE RE REE ERR 


:TEST 14 = TEST THAT PROPER P.C. IS SAVED 


SII IIISIO IIS ISIISISISISIIIIIIIIOIIII III IID III IIOIIIIIOI 


TST14: 


100$: 


1$: 


BIT 





#1 ,CPUERR SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
100$ [BRANCH AR CLEAR AND HALT IF CLEAR 
#177, SFATAL [MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
(R2) ;SET MSGTYP TO FATAL ERROR 

;CPU POWER BIT FOUND SET 
#1, — ies THE BIT FOUND SET 
$TESTN ;UPDATE TEST NUMBER 
#14, $TESTN ; SEQUENCE ERROR? 
TST15-12 ;BRANCH TO ERROR HALT ON SEQ ERROR 
BUFF , SP :STACK POINTER SETUP 
#1$,RTRAP1 # RETURN FROM TRAP POINTER 

RAP ON THIS INSTRUCTION 

4h Fede ‘CHECK INCREMENTED P.C. 
#60, SF ATAL MOVE TO MAILBOX # *eexeee 60 9 xeeeR HR 
(R2) SET MSGTYP TO FATAL ERROR 


INCORRECT P.C.,OR WRONG $TSTNM : 
TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 760 


39 





638 


650 003774 
651 004002 
004004 
004012 
004014 


CKKABCO 11/44 TRAPS 
TEST #15 = TEST THAT ‘OLD’’ CC AND PRI ARE PLACED ON STACK 


032737 





000001 
000177 
000001 
000304 
000015 
000500 
003730 
177776 


000476 
000061 


000500 
003774 
000357 
000476 
000062 


177766 
000302 


177766 
000304 


000034 


000000 
000302 


000034 
177776 


000357 
000302 


MACRO M1113 23-APR-81 12:47 PAGE 34 


SEQUENCE 


.SBTTL TEST #15 = TEST THAT ‘OLD’’ CC AND PRI ARE PLACED ON STACK 


a= ~~~ gtd hip date nti 


[TEST 15 = TEST THAT ‘‘OLD’' CC AND PRI ARE PLACED ON STACK 


Perr rrerrrrrTrrrre TTT Te TTT TTT TTT TTT TTT TTT titi ete EG 


TST15: 


1008: 


2s: 


3$: 


BIT 


#1, CPUERR 
100$ 

#177, SFATAL 
(R2) 

#1, CPUERR 
STESTN 
agri 


UF F , SP 
718 RTRAPI 
cc 


BUF F -2 ,#0 
#61, $FATAL 
(R2) 


#BUFF ,SP 
rt. RTRAP1 
357,CC 
BUF F=-2,4557 

16 


TST 
rat » SFATAL 


:SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
(CH AROUND CLEAR AND HALT IF CLEAR 

“MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 

SET MSGTYP TO FATAL ERROR 

[CPU POWER BIT FOUND SET 

7CLEAR THE BIT FOUND SET 

[UPDATE TEST NUMBER 


; SEQUENCE ERROR? 
SSET UP ;BRANCH TO ERROR HALT ON SEQ ERROR 


SET UP 
ZCLEAR CC AND PRIORITY 


‘Test THAT OLD STATUS WENT TO STACK 


RREKKKK 


MOVE TO MAILBOX # **x*ee 617 
;SET MSGTYP TO FATAL ERROR 

; INCORRECT STATUS 

TO SCOPE REPLACE HALT WITH 240 
:AND * orien NEXT INST WITH 755 


:SET UP 
:SET PRIORITY 
“COMPARES STATUS ON STACK 


MOVE TO MAILBOX # **#eeeee 62 
:SET MSGTYP TO FATAL ERROR 

S INCORRECT STATUS ON STACK,OR WRONG $TSTNM 
[TO SCOPE REPLACE HALT WITH 260 

SAND REPLACE NEXT INST WITH 733 


RaKKKKEK 


40 





C 4 
CKKABCO 11/44 TRAPS MACRO M1113 re 12:47 PAGE 35 SEQUENCE 
TEST #16 = TEST THAT “NEW’’ STATUS IS CORRECT 
652 .SBTTL TEST #16 = TEST THAT ‘NEW'’ STATUS IS CORRECT 


s SORRARARARERHRAHNARARARNNsARSARARAAARAAAAAAAAAAAANAANAAARA NENA NA ISAO aaaees 


[TEST 16 = TEST THAT ‘NEW’’ STATUS IS CORRECT 


PPrrrrrerrrrrrTTTT TTT TTT TT TTT TIT ITI ITLLLLLi Lee 


004016 032737 000001 177766 TST16: BIT #1 ,CPUERR SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
004024 001410 BEQ 100$ BRANCH AROUND CLEAR AND HALT IF CLEAR 
004026 012737 000177 000302 MOV #177, $F ATAL MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
004034 005212 . INC (R2) ;SET MSGTYP TO FATAL ERROR 
004036 000000 HALT [CPU POWER BIT FOUND SET 
004040 042737 000001 177766 BIC #1, CPUERR CLEAR THE BIT FOUND SET 
004046 005237 000304 100$: INC STESTN ;UPDATE TEST NUMBER 
004052 022737 000016 000304 CMP #16,$TESTN SEQUENCE ERROR? 
004060 001402 BEQ 1000$ ;BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
004062 000137 004330 10008 JMP TST17=12 ; JUMP TO ERROR HALT ON SEQ ERROR 
653 004066 012706 000500 V #BUFF ,SP 
654 004072 012737 004106 000034 MOV #1$,RTRAP1 
655 004100 005037 900036 CLR RTRAP1+2 CLEAR FUTURE PRIORITY AND CC 
656 004104 104400 TRAP 
657 004106 1$: :TEST FOR *'C’’ CLEARED 
658 004106 100005 BPL 2s 
004110 012737 000063 000302 MOV #63, $F ATAL MOVE TO MAILBOX # *keexee 635 teeweEe 
004116 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
004120 HALT 7C NOT CLEARED 


E 
TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 761 


659 004122 23: 
004122 001005 BNE 3$ 
004124 012737 000064 000302 MOV #64 , SFATAL MOVE TO MAILBOX # *#exeKe 64 tH KEER 
004132 005212 INC (R2) 7 SET “= 3 TO FATAL ERROR 
004134 000000 HALT :Z NOT CLEARED 
7TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 753 
660 004136 3$: 
004136 102005 BVC 4$ 
004140 012737 000065 000302 MOV #65, SFATAL MOVE TO MAILBOX # *eexeee 65 taxeeee 
004146 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
004150 000000 HALT 3:V_NOT CLEARED 
[TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 745 
661 004152 4$: 
004152 103005 BCC 5$ 
004154 012737 000066 000302 MOV #66, $F ATAL MOVE TO MAILBOX # *#*aeRe 66 the EEK® 
004162 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
004164 HALT :C NOT CLEARED 
[TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 737 
662 004166 032737 000340 177776 S$: BIT #340,CC ; TEST PRIORITY 
663 004174 001405 BEQ $ 
004176 012737 000067 000302 : MOV #67, S$FATAL MOVE TO MAILBOX # xxeKeee 67 teKEEE® 
004204 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
004206 HALT :PRIORITY NOT ZERO 
7TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 726 
664 004210 012706 000500 6$: MOV BUFF , SP 
665 004214 012737 004232 000034 MOV #7$,RTRAP1 
666 004222 012737 000357 000036 MOV #357,RTRAP1+2  ;SET NEW “'CC’’ AND PRIORITY 











CKKABCO 11/44 TRAPS 


667 004230 
668 004232 


104400 


MACRO M1113 a 12:47 


000070 


000071 


000072 


000073 


177776 
000017 
000340 


000074 


000302 


000302 


000302 


000302 


000302 


TEST #16 = TEST THAT ‘NEW'’ STATUS IS CORRECT 


7$: 


8$: 


9$: 


10$: 


11$: 


TRAP 


PAGE 35-1 


8$ 

#70, $FATAL 
(R2) 

9$ 

#71, $FATAL 
(R2) 

10$ 
#72,$FATAL 
(R2) 


11$ 
#73,$FATAL 
(R2) 


; TRAP HERE 


MOVE TO MAILBOX # *xxxeee 70 
SET MSGTYP TO FATAL ERROR 

7N NOT SET 

7TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 707 


MOVE TO MAILBOX # *xxeeee 77] 
7 SET hg TO FATAL ERROR 


:Z NOT SE 
TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 701 


MOVE TO MAILBOX # **xeeee 72 


;SET MSGTYP TO FATAL ERROR 
:V_NOT SET 

TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 673 


MOVE TO MAILBOX # **exeee = 73 
7 SET hy TO FATAL ERROR 


:C NOT SE 
7TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 665 


;MOVE TO MAILBOX # **eexee = 74 
;SET MSGTYP TO FATAL ERROR 


REE 


RREKKKEK 


REKKKEKEK 


REEEKKEK 


RRKKKKE 


:PRIORITY WAS CHANGED,OR WRONG $TSTNM 


TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 651 


SEQUENCE 


42 


4 


-——___-—____—_--- 


MACRO M1113 23-APR-81 12:47 PAGE 36 
*“*TRAP’’ WILL CAUSE A TRAP 


CKKABCO_11/44 TRAPS SEQUENCE 


TEST #17 = TEST THAT ALL COMB 


677 _SBTTL TEST #17 = TEST THAT ALL COMB ‘‘TRAP’’ WILL CAUSE A TRAP 
RARER RARER AREER ERE EAE ER EEE REAR RAERRE AERA ERERE AREER ARERR ERE EES 
‘TEST 17 = TEST THAT ALL COMB ‘‘TRAP’’ WILL CAUSE A TRAP 
SIO IOI III IIIOI III IOI IOUS UTI IR hit tit tt tt 
004342 032737 000001 177766 TST17: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR “POWER MONITOR BIT) IS SET 
004350 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
004352 012737 000177 000302 MOV #177, $F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
004360 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
004362 HALT PU POWER BIT FOUND SFT 
004364 042737 000001 177766 BIC #1, CPUERR CLEAR THE BIT FOUND SET 
004372 005237 000304 100$: INC $TESTN ‘UPDATE TEST NUMBE 
004376 022737 000017 000304 CMP #17,$TESTN S SEQUENCE ERROR? 
004404 001011 BNE 3$ “BRANCH TO ERROR HALT ON SEQ ERROR 
678 004406 012737 104400 004426 MOV ATRAP, 2 ‘INITIALIZE | BASE TRAP INSTRUCTION 
679 004414 012737 004442 000034 MOV #4, 34 “RETURN F RAP TO RAI 
680 004422 012706 000500 1$: MOV #BUFF , SP SSET UP STACK TROIN TER 
681 004426 104400 2: TRAP ‘TRAP INST WILL BE MODIFIED TO TRAP+377 
004430 012737 000075 000302 MOV #75, $F ATAL sMOVE TO MAILBOX # *exxeee 75 xeeeeee 
004436 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
004440 000000 HALT ‘PREVIOUS INST FAILED TO TRAP,OR WRONG STSTNM 
“TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 761 
683 004442 005237 004426 4$: INC 2$ ZINCREMENT TRAP INSTRUCTION 
684 004446 022737 104777 004426 CMP #104777,2$ : TRAP+377 TO UPPER LIMIT 
685 004454 193362 BHIS  1$ ‘HAVE WE TESTED ALL 
686 004456 012737 000036 000034 MOV #36, 34 
687 004464 005037 000036 CLR 36 


——————oeee Se eee eee ee eee 


4 
CKKABCO 11/44 TRAPS MACRO M1113 23-APR=-81 12:47 PAGE 37 SEQUENCE 
TEST #20 = TEST THAT A TRAP OCCURES ON AN “‘IOT’’ INSTRUCTION 

688 | .SBITL TEST #20 - TEST THAT A TRAP OCCURES ON AN ‘'IOT’* INSTRUCTION 


POTTTTT TTT TTT TET TTT EEC TTL LI LLP e ete e cette Tt Pte heh 


be ‘TEST 20 = TEST THAT A TRAP OCCURES ON AN “'IOT'’ INSTRUCTION 


© He ee Re I I I RRR EERE RE EREEERERERREKRREEEREH 


004470 032737 000001 177766 TST20: BIT #1 ,CPUERR 7SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
004476 001410 BEQ 100$ ;BRANCH AROUND CLEAR AND HALT IF CLEAR 
0045 012737 000177 000302 MOV #177, $FATAL sMOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
0045 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
004510 0000 HALT ; POWER BIT FOUND SET 
004512 042737 000001 177766 BIC #1, CPUERR CLEAR THE BIT FOUND SET 
004520 005237 000304 100$: INC STESTN ;UPDATE TEST NUMBE 
004524 022737 000020 000304 CMP #20, $TESTN ; SEQUENCE ERROR? 
004532 001 BNE TST21=12 ;BRANCH TO ERROR HALT ON SEQ ERROR 
689 004534 012706 000500 MOV #BUFF , SP STACK POINTER SETUP 
004540 012737 004562 000020 MOV #1$,RTRAP2 RETURN LOCATION 
691 004546 004 I0T RESERVE INSTRUCTION, SHOULD TRAP 
692 004550 012737 000076 000302 MOV #76,$FATAL MOVE TO MAILBOX # *eeeRHe 760 KARR E ER 
004556 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
004560 0 HALT 310T DIDN'T TRAP,OR WRONG $TSTNM 


3TO SCOPE REPLACE HALT WITH 240 
yAND REPLACE NEXT INST WITH 764 
693 004562 1$: 


44 


| 
| 
| 
| 
| 
| 


CKKABCO 11/44 TRAPS MACRO M1113 23-APR=-81 12:47 PAGE 38 SEQUENCE 45 
TEST #21 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 
694 .SBTTL TEST #21 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


RARER R RARER REE E EERE EERE 


:TEST 21 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


PerrrerrTTT Terr TTT TT TCT TTT TT TIT TITLiTLLLLLiLiee 


004562 032737 000001 177766 {TST21: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
004570 001410 BEQ 100$ ‘BRANCH AROUND CLEAR AND HALT IF CLEAR 
004572 012737 000177 000302 MOV #177, FATAL ;MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
004600 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
004602 000000 HALT *CPU POWER BIT FOUND SFT 
004604 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
004612 005237 000304 100$: INC $TEST ‘UPDATE TEST NUMBER 
004616 022737 000021 000304 CMP #21 STESTN S SEQUENCE ERROR? 
004624 001011 BNE ST22- 12 ;BRANCH TO ERROR HALT ON SEQ ERROR 
695 004626 012706 000500 MOV yaur FSP ; STACK POINTER SETUP 
696 004632 012737 004642 000020 MOV #1$,RTRAP2 RETURN POINTER 
697 004640 000004 107 “RESERVED INSTRUCTION 
698 004642 020627 000474 1$: CMP SP, ABUF F=4 ‘TEST DECREMENT OF SP 
699 004646 001405 BEQ TST22 
004650 012737 000077 000302 MOV #77. $FATAL sMOVE TO MAILBOX # *xaeaee 77 xeenene 
004656 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
004660 000000 HAL T ‘NOT DECREMENTED TWO WORDS,OR WRONG $TSTNM 


;TO SCOPE REPLACE HALT WITH 240 
[AND REPLACE NEXT INST WITH 761 


(or ne ee 


| CKKABCO 11/446 TRAPS 
| TEST #22 = TEST THAT PROPER P.C. 


700 


177766 
000302 


032737 
0 


177766 
000304 


000020 
000474 
000302 


; 


MACRO M1113 pee 12:47 PAGE 39 
IS SAVE 


SEQUENCE 


.SBTTL TEST #22 = TEST THAT PROPER P.C. IS SAVED 


eer ri tii iitist iti 


[TEST 22 = TEST THAT PROPER P.C. 


IS SAVED 


PPeerrrrrrrrrrTTITTTTTTITI TIT TITTLiLiLTLL LLL) 


$122: BIT #1, CPUERR 
BEQ 100$ 
MOV #177,$FATAL 
INC (k2) 
HALT 
BIC 4P zGPUERR 
100$: INC 
CMP #2, STESTN 
BNE ST23 3-1 
MOV weUFF 3p 
a #1$,RTRAP2 
1$ CMP #1$,BUFF=-4 
BEQ TST23 
MOV #100, $FATAL 
INC (R2) 
HALT 


;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
[BRANCH AROUND CLEAR AND HALT IF CLEAR 

TMOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 

sSET MSGTYP TO FATAL ERROR 


;SEQUENCE ERROR? 
BRANCH TO ERROR HALT ON SEQ ERROR 
: STACK POINTER SETUP 
;RETURN FROM TRAP POINTER 
STRAP ON THIS INSTRUCTION 
ZCHECK FOR INCREMENTED P.C. 


MOVE TO MAILBOX # **eeeee" 100 
7SET MSGTYP TO FATAL ERROR 

; INCORRECT P.C.,0R WRONG STSTNM 
:TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 760 


eeeenne 


46 


———$—<$—$ ‘ 
| 1 4 
| CKKABCO_11/44 TRAPS MACRO M1113 23-APR-81 12:47 PAGE 40 

_ TEST #23 = TEST THAT “OLD'’ CC AND PRI ARE PLACED ON STACK 


706 .SBTTL TEST #23 = TEST THAT ‘OLD'’ CC AND PRI ARE PLACED ON STACK 


RTE ELLE LL Dial ba lelallalalabalahalatadabaladeletebabelaleteialtetetteiataiaieiaiaiaiaieieieieiaieiaiehe 


:TEST 23 = TEST THAT ‘OLD’’ CC AND PRI ARE PLACED ON STACK 


PrrrrrrrrTTTTTITITITiTiT tit titi iii tii iii 


SEQUENCE 47 


004764 032737 000001 177766 TST23: BIT #1, CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
004772 001410 BEQ 100$ H AROUND CLEAR AND HALT IF CLEAR 
004774 012737 000177 000302 #177, $FATAL “MOVE SPEC CIAL POWER MONITOR FATAL # TO SFATAL 
005002 005212 INC (R2) SSET MSGTYP TO FATAL ERROR 
005004 HALT :CPU POWER BIT FOUND SFT 
005006 042737 000001 177766 BIC HE ZCPUERR [CLEAR THE BIT FOUND SET 
005014 005237 000304 100$: INC [UPDATE TEST NUMBER 
005020 022737 000023 000304 CMP #23, STESTN S SEQUENCE ERROR? 
0050 1040 BNE $1724-1 “BRANCH TO ERROR HALT ON SEQ ERROR 
707 005030 012706 000500 MOV weUrF sp :SET UP 
708 005034 012737 005052 000020 MOV #1$,RTRAP2 :SET UP 
005042 005037 177776 CLR cc SCLEAR CC AND PRIORITY 
10 00 000257 ccc ad 
023727 000476 000000 1$: cmp BUFF-2.40 [TEST THAT OLD STATUS WENT TO STACK 
012737 000101 000302 MOV #101, $FATAL :MOVE TO MAILBOX # seeeeee 101 seeneee 
005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
HALT S INCORRECT STATUS 
*TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 755 
714 005074 012706 000500 2s: MOV #BUFF ,SP :SET UP 
715 005100 012737 005120 000020 MOV #3$,RTRAP2 :SET UP 
716 005106 012737 000357 177776 MOV #357,CC :SET PRIORITY 
717 005114 277 SCC SSET CC 
718 005116 10T : : 
719 005120 023727 000476 000357 3$: CMP BUF F=-2,4357 “COMPARES STATUS ON STACK 
720 005126 001405 BEQ TST24 
005130 012737 000102 000302 MOV #102, SFATAL :MOVE TO MAILBOX # s#eexee 102 seeeeee 
005136 005212 INC (R2) 7SET MSGTYP TO FATAL ERROR 
005140 HALT + INCORRECT STATUS ON STACK,OR WRONG STSTNM 


2 

7 5046 
711 005050 
712 005052 
713 005060 
005062 
005070 
005072 


—_---- - Se ae eee eee a a —— at 


| CkKKABCO 11/446 TRAPS MACRO 1113 le ad 12:47 PAGE 41 SEQUENCE 
| TEST #24 = TEST THAT ‘NEW’ STATUS IS CORRECT 
| 721 .SBTITL TEST #24 = TEST THAT ‘NEW’ STATUS IS CORRECT 
! j eee eeeeeReeneeeeneereerereaeeneneneneteeteneeeneeeenaeereneneneeeneeerers 
:TEST 24 = TEST THAT ‘NEW’ STATUS IS CORRECT 
} PrrerrerrrrrrrrrTrTTITITITITITIIL LIL LL LLL LiL) 
005142 032737 000001 177766 $124: BIT #1, CPUERR SEE IF BIT O OF CPUERR (POWER MONITOR BIT) IS SET 
005150 001410 BEQ 100$ SBRANCH AROUND CLEAR AND HALT IF CLEAR 
005152 012737 000177 000302 MOV #177, SF ATAL MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
005160 005212 INC (R2) -SET MSGTYP TO FATAL ERROR 
005162 000000 HALT CPU POWER BIT FOUND SFT 
005164 042737 000001 177766 BIC 4  CPUERR ;CLEAR THE BIT FOUND SET 
005172 005237 000304 100$: INC TESTN ;UPDATE TEST NUMBER 
005176 022737 000024 000304 (MP p24 STESTN SEQUENCE ERROR? 
005204 001402 BEQ 1000$ SBRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
005206 000137 005454 JMP. 138 : JUMP TO ERROR HALT ON SEQ ERROR 
005212 1000S: 
722 005212 012706 000500 MOV #BUFF ,SP 
723 005216 012737 005232 000020 MOV #1$,RTRAP2 
724 005224 005037 000022 CLR RTRAP2+2 CLEAR FUTURE PRIORITY AND CC 
725 005230 000004 ioT 
726 605232 1$: TEST FOR “'C’’ CLEARED 
727 005232 100005 BPL 2s 
005234 012737 000103 000302 MOV #103, SFATAL MOVE TO MAILBOX # *eeeeee 103 seeenee 
005242 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
005244 000000 HALT *N NOT CLEARED 


E 
7TO0 SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 761 


728 005246 2$: 
005246 001005 BNE 3$ 
005250 012737 000104 000302 MOV #104, SFATAL MOVE TO MAILBOX # seeeeee 104 seneeee 
005256 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
005260 000000 HALT 72 NOT CLEARED 
7TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 753 
729 005262 3$: 
005262 102005 BVC 4$ 
264 012737 000105 000302 MOV #105,$FATAL MOVE TO MAILBOX # seeeeee 105 seeenee 
005272 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
005274 000000 HALT :V_NOT CLEARED 
7TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 745 
730 005276 4$: 
005276 103005 BCC 5$ 
005300 012737 000106 000302 MOV #106, $FATAL MOVE TO MAILBOX # seeeeee 106 teeeene 
005306 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
005310 000000 HALT 7C NOT CLEARED 
7TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 737 
731 005312 032737 000340 177776 5$: BIT #340,CC TEST PRIORITY 
732 005320 001405 BEQ 6 
005322 012737 000107 000302 MOV #107, $F ATAL MOVE TO MAILBOX # seexeee 107 seeeeee 
005330 005212 INC (R2) 4H MSGTYP TO FATAL ERROR 
005332 000000 HALT PRIORITY NOT ZERO 
[TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 726 
733 005334 012706 000500 6$: MOV #BUFF , SP 
734 005340 012737 005356 000020 MOV #7$,RTRAP2 
735 005346 012737 000357 000022 MOV #357,RTRAP2+2  ;SET NEW ‘‘CC’’ AND PRIORITY 





005354 


736 
737 005356 
005356 


005366 
005370 


738 005372 
72 


745 005466 
746 095474 


CKKABCO 11/44 a B 
TEST #24 = TEST 


001405 
005212 
000000 


012737 
005212 


012737 
005037 





MACRO M1113 ty 12:47 PAGE 41-1 
T NEW’ STATUS IS CORRECT 


000110 


000111 


000112 


000113 


177776 
000017 
000340 


000114 


000022 
000022 


10T 
7$: 


8$ 
000302 MOV #110, SFATAL 
(R2) 
8$: 


9$ 
000302 MOV #111,$FATAL 
(R2) 


9$: 
10$ 
000302 MOV #112, $FATAL 
(R2) 
10$: 
11$ 
000302 MOV #113, $F ATAL 
(R2) 
11$: MOV CC,SP 


12$: 


000302 MOV #114, $F ATAL 
(R2) 


000020 13$: MOV $5.20 


; TRAP HERE 


eeneaee 


MOVE TO MAILBOX # *eeeeee 110 
Ser eg hg TO FATAL ERROR 


7N NOT SET 
TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 707 


ageeenee 


MOVE TO MAILBOX # *eeeeee 171 
7 SET ap hg TO FATAL ERROR 


ZNO 
3T9 SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 701 


RekRREE 


MOVE TO MAILBOX # **#eeeee 6112 
;SET MSGTYP TO FATAL ERROR 


:V_NOT SET 
TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 673 


RREREKEK 


MOVE TO MAILBOX # *eeeee §=6113 
2SET MSGTYP TO FATAL ERROR 
NOT SET 


[TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 665 


kakkeeke 114 eeenaee 


s;MOVE TO MAILBOX # 
;SET MSGTYP TO FATAL ERROR 


; GED ,OR 
[TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 651 


HALT 


SEQUENCE 


49 


i 






















CKKABCO 11/44 TRAPS 


747 


177766 
000302 


032737 
1410 


177766 

000304 

005542 

748 005544 

749 005550 012737 005572 
750 005556 104000 

751 sees 


005566 
005570 


000030 
000302 


752 005572 


MACRO M1113 23-APR-81 Alyy 47 PAGE 42 
TEST #25 = TEST THAT A TRAP OCCURS ON AN EMT 


L 4 
SEQUENCE 


.SBTTL TEST #25 = TEST THAT A TRAP OCCURS ON AN EMT INS 


RRR RRR EEE EERE ERE A ERE R REAR EERE ERE REE 


STEST 25 = TEST THAT A 


TRAP OCCURS ON AN EMT INS 


hd tt alll te A tle eB dhol ch BE 3 PIED SE RISE AD EE 


TST25: 


100$: 


BIT 


#1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
100$ ‘BRANCH AROUND CLEAR AND HALT IF CLEAR 
#177, $F ATAL :MOVE  § SPECIAL POWER MONITOR FATAL # TO SFATAL 
(R2) "SET MSGTYP TO FATAL ERROR 
“CPU POWER BIT FOUND SET 
#1, CPUERR ‘CLEAR THE BIT FOUND SET 
$TESTN ‘UPDATE TEST NUMBER 
#25 STESTN SEQUENCE ERROR? 
1ST26 6-1 :BRANCH TO ERROR HALT ON SEQ ERROR 
WBUF a3 ;STACK POINTER SETUP 
#1$,RTRAP3 SRETURN LOCATION 


TRESERVE INSTRUCTIOM, SHOULD TRAP 
#115, S$FATAL SMOVE TO MAILBOX # txxexex 115 
(R2) sSET MSGTYP | TO FATAL ERROR 

EMT DIDN'T TRAP,OR WRONG $TSTNM 

TO SCOPE REPLACE HALT WITH 240 

SAND REPLACE NEXT INST WITH 764 


RREKKKEK 





50 


+--+ —- - = + te 













753 


CKKABCO 11/44 TRAPS 
TEST #26 = TEST DEC OF STACK POINTER ON A TRAP OP 


032737 
001410 


MACRO M1113 23-APR-81 ig ¥ PAGE 43 


000116 





177766 
000302 


177766 
000304 


000030 


000302 


M 4 


SEQUENCE 


.SBTTL TEST #26 = TEST DEC OF STACK POINTER ON A TRAP OPER 


DE ESE EIEIO IO IOICICICISIOIEIIIITITIIOIOIOIOIOI TIO IT ITT IITA IIIT AI IIASA SII AISI IIIA SIA 


:TEST 26 = TEST DEC OF STACK POINTER ON A TRAP OPER 


SI II IOI III OOS ORIOIIOIOI IO IIOIORO IORI IOI IOI AAI AIA ISAS SAISSSSSSISSASS 


TST26: 


100$: 


1$: 





#1, CPUERR 
100$ 
#177, $F ATAL 
(R2) 

#1, CPUERR 
$TEST 

#26 STESTN 
Iste7-12 
#BUFF , SP 
#1$,RTRAP3 
SP, ABUF F -4 
TST27 

#116, $FATAL 
(R2) 


SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
SBRANCH AROUND CLEAR AND HALT IF CLEAR 

“MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 

SET MSGTYP Ls FATAL ERROR 

;CPU POWER BIT FOUND 


SEQUENCE ERROR? 
BRANCH TO ERROR HALT ON SEQ ERROR 
2 STACK POINTER SETUP 
;RETURN POINTER 
SRESERVED INSTRUCTION 
TEST DECREMENT OF SP 


MOVE TO MAILBOX # *exxeee 116 eeeeee 
“SET MSGTYP TO FATAL ERROR 
“NOT DECREMENTED TWO WORDS.OR WRONG $TSTNM 
"TO SCOPE REPLACE HALT WITH 240 
[AND REPLACE NEXT INST WITH 761 















759 


CKKABCO_11/44 TRAPS 
TEST #27 = TEST THAT PROPER P.C. IS SAV 


032737 
0 


MACRO M1113 tid 12:47 PAGE 44 


000500 
005752 


005752 
000117 





177766 
000302 


177766 
000304 


000030 
000474 
000302 


SEQUENCE 


.SBTTL TEST #27 = TEST THAT PROPER P.C. IS SAVED 


SIS IORI IIIS IID IIIDIOIIOIIUII IUD Rint it tit tt tt 


STEST 27 = TEST THAT PROPER P.C. IS SAVED 


EAI SEIS ISOS IOI EIS ISSO IIIOISIOIOIIOIOIIOIISOISIOIIOIIIOIISIOI IOI IOI IIE 


TST27: 


100$: 


1$: 


#1, CPUERR 
100$ 

#177, $FATAL 
(R2) 

aE  GPUERR 
$a. STESTN 
TST30-12 
#BUFF , 3 
#1$,RTRAP3 
#1$,BUFF=4 
TST30 

#117, $FATAL 
(R2) 


SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
[BRANCH AROUND CLEAR AND HALT IF CLEAR 

ZMOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 

2 SET ooh TO FATAL ERROR 


; SEQUENCE ERROR? 
CH TO ERROR HALT ON SEQ ERROR 
7 STACK POINTER SETUP 
:RTURN FROM TRAP POINTER 
RAP ON THIS INSTRICTION 
‘CHECK FOR INCREMENTED P.C. 


:MOVE TO MAILBOX # *eexee® 117 eeeeeHE 
SET MSGTYP TO FATAL ERROR 

S INCORRECT P.C.,0R WRONG $TSTNM 

:TO SCOPE REPLACE HALT WITH 240 

SAND REPLACE NEXT INST WITH 760 


52 






B 5 





CKKABCO 11/44 TRAPS MACRO M1113 23-APR=81 12:47 PAGE 45 SEQUENCE 


TEST #30 = TEST THAT ‘OLD'’ CC AND PRI ARE PLACED ON STACK 


765 _SBTTL TEST #30 = TEST THAT ‘‘OLD'' CC AND PRI ARE PLACED ON STACK 
[RNRRRRERER REAR AAREEE EAA RARER RARER ARERR RRR RARER Re 
“TEST 30 = TEST THAT "‘OLD'' CC AND PRI ARE PLACED ON STACK 
PPro rrerrrrT Terr TTT TTTITTTITITT LILLIE LLL LLL LLL Lidl 
005774 032737 000001 177766 TST30: BIT #1, CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
006002 001410 BEQ 100$ (CH AROUND CLEAR AND HALT IF CLEAR 
006004. 012737 000177 000302 MOV #177, $F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 
006012 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
006014 HALT ‘CPU POWER BIT FOUND SFT 
006016 042737 1 177766 BIC #1, CPUERR SCLEAR THE BIT FOUND SET 
006024 005237 000304 100$: INC STEST [UPDATE TEST NUMBER 
006030 022737 000030 000304 CMP #30 STESTN * SEQUENCE ERROR? 
006036 001040 BNE 5731-1 ;BRANCH TO ERROR HALT ON SEQ ERROR 
766 006040 012706 000500 MOV burr. 3 ;SET UP 
767 006044 012737 006062 000030 MOV #1$,RTRAP3 ‘SET UP 
768 006052 005037 177776 CLR CC “CLEAR CC AND PRIORITY 
769 006056 000257 CCC 
770 04000 EMT ; TRAP 
771 023727 000476 000000 1S: CMP BUFF-2,#0 :TEST THAT OLD STATUS WENT TO STACK 
772 006070 001405 BEQ 
006072 012737 000120 000302 MOV #120, $FATAL :MOVE TO MAILBOX # *xexeee 120 xxennee 
006100 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
006102 HALT ‘INCORRECT STATUS 
‘TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 755 
773 006104 012706 000500 2s: MOV #BUFF,SP ‘SET UP 
774 006110 012737 006130 000030 MOV #3$, ,RTRAP3 :SET UP 
775 006116 012737 000357 177776 MOV #357,CC “SET PRIORITY 
006124 277 SCC *SET CC 
777 006126 104 EMT > TRAP 
778 006130 023727 000476 000357 38: CMP BUFF-2,4#357 “COMPARES STATUS ON STACK 
779 006136 001405 BEQ TST31 
006140 012737 000121 000302 MOV #121, $FATAL :MOVE TO MAILBOX # *eexeee 121) weeeeee 
006146 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
006150 HALT “INCORRECT STATUS ON STACK,OR WRONG $TSTNM 





3;TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 732 







































CKKABCO 11/44 TRAPS 
TEST #31 = TEST THAT ‘NEW’ STATUS IS CORRECT 


006152 032737 000001 177766 TST31: 
006160 0 

006162 012737 000177 000302 
177766 


006202 005237 000304 100$: 
06 000304 


012706 
782 006226 012737 006242 000030 
783 34 
784 4 
785 006242 1$: 
786 4 


100005 
012737 000122 000302 


787 sleet og 2$: 
pecs? 012737 000123 000302 


788 006272 3$: 
006272 102005 
006274 012737 000124 000302 
006302 2 


789 006306 4$: 
006306 5 
5 000125 000302 


000340 177776 5$: 
000126 000302 


06 000500 6$: 
37 006366 000030 
37 000357 000032 


792 006344 012 
793 006350 012 
794 006356 012 





1000S: 


BIT 


MACRO M1113 ee 12:47 PAGE 46 


oe , CPUERR 


06$ . 
#177,SFATAL | 
(R2) 


#1, CPUERR 
$TESTN 

#31 ,$TESTN 
1000$ 
TST32=12 
WBUFF , SP 
#1$,RTRAPS 
RTRAP3+2 


2s 

#122, $FATAL 
(R2) 

3$ 
#123, $F ATAL 
(R2) 

4$ 

#124,$F ATAL 
(R2) 


5$ 
#125, $FATAL 
(R2) 


#340,CC 
#126, $F ATAL 
(R2) 


—- 
#78, RTRAP3 


#357, RTRAP3+2 





SEQUENCE 


780 .SBTTL TEST #31 = TEST THAT “NEW'' STATUS IS CORRECT 


ordained Peggy eho pceeacaatteainls 


[TEST 31 = TEST THAT ‘NEW'’ STATUS IS CORRECT 


PreerrerrerTrrerTTTTTITITTTTIT TTI TITTLE LL LLL 


3+: IF BIT O OF CPUERR (POWER MONITOR BIT) IS SET 
(CH AROUND CLEAR AND HALT IF CLEAR 
MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
SET aaah TO FATAL ERROR 


SEQUENCE ERROR? 


SBRANCH OVER ERROR HALT ON SEQ ERROR + IF OK 


; JUMP TO ERROR HALT ON SEQ ERROR 


;CLEAR FUTURE PRIORITY AND CC 
TEST FOR ‘'C’’ CLEARED 
sMOVE TO MAILBOX # *eeeeee 122 txeneee 


;SET MSGTYP TO FATAL ERROR 
:C NOT CLEARED 

:T0 SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 761 


:MOVE TO MAILBOX # seexeee 123 eeenees 
[SET MSGTYP TO FATAL ERROR 

[7 NOT CLEARED 

[TO SCOPE REPLACE HALT WITH 240 

SAND REPLACE NEXT INST WITH 753 


REeeeee 


MOVE TO MAILBOX # *eeexee = 124 
;SET MSGTYP TO FATAL ERROR 
;V_NOT CLEARED 

7TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 745 


Rakkkee 


MOVE TO MAILBOX # **eee#e = 6125 
;SET MSGTYP TO FATAL ERROR 

:C_ NOT CLEARED 

;TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 737 
TEST PRIORITY 


sMOVE TO MAILBOX # ***eeee 126 skenene 
3;SET MSGTYP TO FATAL ERROR 

SPRIORITY NOT ZERO 

TO SCOPE REPLACE HALT WITH 240 

SAND REPLACE NEXT INST WITH 726 


SET NEW “‘CC’’ AND PRIORITY 


va 


dD 5 
CKKABCO 11/44 TRAPS MACRO M1113 Samy 12:47 PAGE 46-1 SEQUENCE 
TEST #31 = TEST THAT ‘NEW’ STATUS IS CORRECT , 


795 006364 104000 EMT ; TRAP HERE 
796 006366 7$: 
006 100405 BM! 8$ 
006370 012737 000127 000302 MOV #127, $F ATAL :MOVE TO MAILBOX # *keeeee 127 xeeeene 
006376 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
006400 000000 HALT ‘N NOT 


SET 
3TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 707 


797 006402 8$: 
006402 001405 BEQ 9$ 
006404 012737 000130 000302 MOV #130, $FATAL sMOVE TO MAILBOX # *xeexee 130 xeeeeee 
006412 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
006414 000000 HALT :Z NOT SET 
‘TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 701 
798 006416 9$: 
006416 102405 BVS 10$ 
006420 012737 000131 000302 MOV #131, $FATAL :MOVE TO MAILBOX # *eeaexe 13] xeeneee 
006426 005212 iNC (R2) ‘SET MSGTYP TO FATAL ERROR 
006430 000000 HALT ‘V NOT SET 
‘TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 673 
799 006432 108: 
006432 103405 BCS 11$ 
006434 012737 000132 000302 MOV #132, $FATAL sMOVE TO MAILBOX # *eexeee 132 seeeeee 
006442 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
006444 000000 HALT =C NOT SET 
:TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 665 
800 006446 000257 11$: CCC 
801 006450 022737 000340 177776 CMP #340,CC 
802 006456 001405 BEQ TST32 
006460 012737 000133 000302 MOV #133, $FATAL :MOVE TO MAILBOX # *#aexee 133 eenenne 
006466 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
006470 000000 HALT ‘PRIORITY WAS CHANGED,OR WRONG $TSTNM 


TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 655 


55 


803 


2 
813 006606 
814 006614 


CKKABCO 11/44 TRAPS 
TEST #32 = TEST THAT ALi COMB EMT WIL 


HEA 
0014 

012737 
005212 
000000 


042737 
005237 
022737 
001011 
012737 
012737 
012706 
104000 


012737 
005212 
000000 


005237 
022737 
103362 


012737 
005037 


MACRO M1113 23=APR-81 a tae 47 PAGE 47 


000134 


006556 


104377 


000032 
000032 


177766 
000302 


177766 
000304 


006556 
000030 


000302 


006556 


000030 


LL CAUSE A 


SEQUENCE 


.SBTTL TEST #32 = TEST THAT ALL COMB EMT WILL CAUSE A TRAP 


RRR RAR ARERR E EERE REAR ARERR AREA AERA EERE RERA ARERR ERS 


:TEST 32 = TEST THAT ALL COMB EMT WILL CAUSE A TRAP 


PPerrrerrrrTrrTTTT TTT TTT TTT TT TILT I TTL 


TST32: 
100$: 
1$: 
2$: 
3$: 


4$: 


#1 , CPUERR 
100$ 

#177, $FATAL 
(R2) 

#1 ,CPUERR 
STESTN 

#32, $TESIN 
3$ 


HEMT, 2$ 
#4$, 30 
#BUFF , SP 


#134, $FATAL 
(R2) 


2$ 
#EMT+377,2$ 
1$ 


#32,30 
32 


SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
[BRANCH AROUND CLEAR AND HALT IF CLEAR 

[MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 

SET MSGTYP TO FATAL ERROR 

CPU POWER BIT FOUND SET 
[CLEAR THE BIT FOUND SET 
[UPDATE TEST NUMBER 


7SEQUENCE ERROR? 

;BRANCH TO ERROR HALT ON SEQ ERROR 
i ct — INSTRUCTION 
;RETURN F 0 3$ 


:SeT UP STACK "BOINTER 
;TRAP INST. WILL BE MODIFIED TO EMT+377 


;MOVE TO MAILBOX # 
;SET MSGTYP TO FATAL ERROR 

[PREVIOUS INST FAILED TO TRAP,OR WRONG $TSTNM 
TO SCOPE REPLACE HALT WITH 240 

ZAND REPLACE NEXT INST WITH 761 

; INCREMENT 4 INSTRUCTION 

TEMT+377 TOE 

HAVE WE TESTED. "aut 


J rs 
HALT 


kaeraeeee 134 eeeeene 
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I 
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CKKABCO 11/44 TRAPS MACRO M1113 23=APR=81 12:47 PAGE 48 SEQUENCE 
TEST #33 = TEST THAT A TRAP OCCURES ON AN ‘'TRACE-TRT’' INS 
815 _SBITL TEST #33 - TEST THAT A TRAP OCCURES ON AN ‘‘TRACE-TRT'' INS 
peaanananagnsaanaanarseeerananangqananagananeqsaggnanangasanaaaanassensess” 
:TEST 33 = TEST THAT A TRAP OCCURES ON AN ‘'TRACE=TRT'' INS 
PPeereerrrrrrrrr Terr TTT TTT TTT TT TTT TTT TTT TITLE iti ee 
006620 032737 000001 177766 S733: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
006626 001410 BEQ 100$ ‘BRANCH AROUND CLEAR AND HALT IF CLEAR 
006630 012737 000177 000302 MOV #7°77,$F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
006636 005212 INC (R2). ‘SET MSGTYP TO FATAL ERROR 
006640 000000 HALT ‘CPU POWER BIT FOUND SFT 
006642 042737 000001 177766 BIC #1, CPUERR *CLEAR THE BIT FOUND SET 
006650 005237 000304 100$: INC $TE [UPDATE TEST NUMBER 
006654 022737 000033 000304 CMP W3, STESTN * SEQUENCE ERROR? 
006662 001006 BNE ST 34-1 sBRANCH TO ERROR HALT ON SEQ ERROR 
816 006664 012706 000500 MOV aE eg 3 zSTACK POINTER SETUP 
817 006670 012737 006712 000014 MOV #1$,RTRAPG SRETURN LOCATION 
818 006676 000003 TRT S RESERVED INSTRUCTION, SHOULD T 
819 006700 012737 000135 000302 MOV #135, $FATAL ‘MOVE TO MAILBOX # *keeene 130 ateeene 
006706 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
006710 000000 HALT ‘TRT DIDN'T TRAP,OR WRONG $TSTNM 


710 SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 764 
820 006712 1$: 


57 


Pt act tate ee ee ee a - o 
6 5 


|S CKKABCO 11/44 TRAPS MACRO M1113 23=APR-81 is 47 PAGE 49 SEQUENCE 
TEST #34 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 
821 .SBTTL TEST #34 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


SRARRRRRRE RARER ERRATA AREER ARERR EERE AAR AEEERE R EE 


*TEST 34 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


Prrrrrerrr Terr rT rer Terre TTT TTT TTT TTT ttt titi tit iti t ttt kh od 


006712 032737 000001 177766 TST34: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONI TOR BIT) IS SET 
006720 001410 BEQ 100$ ‘BRANCH AROUND CLEAR AND HALT IF CLEAR 
006722 012737 000177 000302 MOV #177, $F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 
006730 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
006732 000000 HALT [CPU POWER BIT FOUND SFT 
006734 042737 000001 177746 BIC #1, CPUERR ‘CLEAR THE BIT FOUND SET 
006742 005237 000304 100$: INC S$TEST [UPDATE TEST NUMBER 
006746 022737 000034 000304 CMP #346 STESTN * SEQUENCE ERROR? 
006754 001011 BNE 1ST55-1 ;BRANCH TO ERROR HALT ON SEQ ERROR 
822 006756 012706 000500 MOV ABUF F gf ; STACK POINTER SETUP 
823 006762 012737 006772 000014 MOV #1$,RTRAPG “RETURN POINTER 
824 006770 000003 TRT ‘RESERVED INSTRUCTION 
825 006772 020627 000474 1$: CMP SP, ABUF F 4 ‘TEST DECREMENT OF SP 
826 006776 001405 BEQ TST35 
007000 012737 000136 000302 MOV #136, $FATAL sMOVE TO MAILBOX # *eexene 136 seeeene 
607006 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
007010 000000 HALT ‘NOT DECREMENTED TWO WORDS,OR WRONG $STSTNM 


TO SCOPE REPLACE HALT WITH 240 
[AND REPLACE NEXT INST WITH 761 


CRKABCO 11/44 TRAPS MACRO M1113 ee 12:47 PAGE 50 SEQUENCE 
TEST #35 = TEST THAT PROPER P.C. IS SAVED 
827 .SBTTL TEST #35 = TEST THAT PROPER P.C. IS SAVED 
eTrrti titties lle 
:TEST 35 = TEST THAT PROPER P.C. IS SAVED 
PTTTITITITITT LIL LLL LLL LLL LLL 
007012 032737 000001 177766 TST35: BIT #1 ,CPUERR SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
007020 001410 BEQ 100$ [BRANCH AROUND CLEAR AND HALT IF CLEAR 
007022 012737 000177 000302 MOV #177, SFATAL MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
007030 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
007032 000000 HALT :CPU POWER BIT FOUND SFT 
007034 042737 000001 177766 BIC 4 n CLEAR THE BIT FOUND SET 
007042 005237 000304 100$: INC UPDATE TEST NUMBER 
007046 022737 000035 000304 CMP *35. STESTN ; SEQUENCE ERROR? 
007054 001012 BNE TST 36-12 ;BRANCH TO ERROR HALT ON SEQ ERROR 
828 007056 012706 000500 MOV rBUFF Sp 2 STACK POINTER SETUP 
829 007062 012737 007072 000014 MOV #1$ ,RTRAPG ;RETURN FROM TRAP POINTER 
830 007070 000003 TRT STRAP ON THIS INSTRUCTION 
831 007072 022737 007072 000474 1$: CMP #. ,BUFF=4 TCHECK FOR INCREMENTED P.C. 
832 007100 001405 BEQ TST36 
007102 012737 000137 000302 MOV #137, SFATAL ;MOVE TO MAILBOX # seeeeee 137 eaneene 
607110 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
007112 000000 HALT ZINCORRECT P.C.,OR WRONG STSTNM 


7TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 760 


59 


coc - CT - F------- -- > 


| 1 § 
| CKKABCO 11/446 TRAPS MACRO M1113 23-APR-81 12:47 PAGE 51 
| TEST #36 = TEST THAT "OLD’’ CC AND PRI ARE PLACED ON STACK 


SEQUENCE 


; 


833 _SBTTL TEST #36 = TEST THAT “‘OLD’’ CC AND PRI ARE PLACED ON STACK 
eer rh dled delaalalallalabababalalaiaiebebabeiaiaiaeiaiael 
| ‘TEST 36 = TEST THAT ‘‘OLD’’ CC AND PRI ARE PLACED ON STACK 
PPPerroerrTTTTTTITITITIII TILL LLL LLL 
007114 032737 000001 177766 S136: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
007122 001410 BEO 100$ ; H AROUND CLEAR AND HALT IF CLEAR 
007124 012737 000177 000302 MOV #177, SFATAL : AL POWER MONITOR FATAL # TO SFATAL 
007132 005212 INC (R2) [SET MSGTYP TO FATAL ERROR 
007134 HALT =CPU POWER BIT FOUND SFT 
007136 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
007144 005237 000304 100$: INC TESTN [UPDATE TEST NUMBE 
007150 022737 000036 000304 CMP #36,$TESTN SEQUENCE ERROR? 
007156 001040 BNE 1ST37=1 BRANCH TO ERROR HALT ON SEQ ERROR 
34 007160 012706 000500 MOV #BUF FSP sSET UP 
835 007164 012737 007202 000014 MOV #1$,RTRAPS SET UP 
836 007172 005037 177776 CLR cc “CLEAR CC AND PRIORITY 
837 007176 000257 aaa 
838 007200 3 TRT TRAP 
839 007202 023727 000676 000000 1S: CMP BUFF -2,40 STEST THAT OLD STATUS WENT TO STACK 
840 ‘TEST FOR ALL ZEROS 
841 007210 001405 BEQ 2s 
007212 012737 000140 000302 MOV #140, $FATAL :MOVE TO MAILBOX # seeeee" 140 eeneeee 
007220 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
007222 HALT ‘INCORRECT STATUS 
*TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 755 
B42 007224 012706 000500 2s: MOV #BUFF , SP 7SET UP 
843 007230 012737 007250 000014 MOV #3$,,RTRAPG [SET UP 
844 007236 012737 000357 177776 MOV #357,CC [SET PRIORITY 
845 007244 277 SCC TSET-SET CC 
6 007246 3 TRI :T 
847 007250 023727 000476 000357 38: CMP BUFF -2,4357 “COMPARES STATUS ON STACK 
007256 00140 BEQ S137 
007260 012737 000141 000302 MOV #161, $F ATAL sMOVE TO MAILBOX # s#eeee 141 seeeewe 
007266 005212 INC | (R2) “SET MSGTYP TO FATAL ERROR 


; INCORRECT STATUS ON STACK,OR WRONG $STSTNM 
3;TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 732 


o_o eee eee nn eee — 





| -< 
CKKABCO 11/46 TRAPS RO M1113 23-APR=B1 12:47 PAGE 52 SEQUENCE 
TEST #37 = TEST THAT NEW STATUS 1S CORRECT 
| 849 .SBTTL TEST #37 = TEST THAT “NEW STATUS IS CORRECT 
| PeAAAAReReAeAAAAERAKKAAeteAAAAHAAAKAAKKAAKAAeAAeKeaRKeaKAaaeKaeeaneaaseaaae 
| [TEST 37 = TEST THAT ‘NEW’ STATUS IS CORRECT 
PrrerrererrrrrrrTITTTTITITITI TITTLE 
907272 032737 000001 177766 S137: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
007 001410 BEOQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
g 012737 000177 000302 MOV #177,SFATAL [MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
007310 005212 INC (R2) SSET MSGTYP TO FATAL ERROR 
007312 000000 HALT [CPU POWER BIT FOUND SET 
007314 042737 000001 177766 BIC #1, CPUERR :CLEAR THE BIT FOUND SET 
007322 005237 000304 100$: INC $TESTN [UPDATE TEST NUMBER 
007526 022737 000037 000304 CMP #37,$TESTN SEQUENCE ERROR? 
007334 001402 BEQ 10008 “BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
007336 000137 007604 JMP 15$ JUMP TO ERROR HALT ON SEQ ERROR 
007342 1000S: 
850 007342 012706 000500 MOV #BUFF , SP 
851 007346 012737 007362 000014 MOV #4$ ,RTRAPG 
85¢ 007354 005037 000016 CLR RTRAP4+2 SCLEAR FUTURE PRIORITY AND CC 
853 007360 000003 TRT 
854 007362 48: :TEST FOR "'C’’ CLEARED 
855 007362 100005 BPL 5$ 
7364 012737 000142 000302 MOV #142, $F ATAL sMOVE TO MAILBOX # sseenee 142 seesnee 
007372 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
007374 000000 HALT iC NOT CLEARED 
“TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 761 
856 007376 5$: 
007376 001005 BNE 6$ 
007400 012737 000143 000302 MOV #143, $FATAL SMOVE TO MAILBOX # *#eenee 143 seeenee 
007406 005212 INC (R2) SET nscrvP TO FATAL ERROR 
007410 000000 HALT +2 NOT CLEARED 
!TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 753 
857 007412 68: 
007412 102005 BVC 7$ 
007414 012737 000144 000302 MOV #144, $F ATAL :MOVE TO MAILBOX # texas 144 stevens 
007422 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
007424 000000 HALT *V NOT CLEARED 
:TO SCOPE REPLACE HALT WITH 240 
+ AND REPLACE NEXT INST WITH 745 
858 007426 7$: 
007426 103005 BCC 8$ 
007430 012737 000145 000302 MOV #145, $F ATAL SMOVE TO MAILBOX # *xeexee 145 seeneee 
007436 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
007440 000000 HALT *C NOT CLEARED : 
:TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 737 
859 007442 032737 000340 177776 8S: BIT #340,CC ‘TEST PRIORITY 
860 007450 001405 BEQ 9$ 
007452 012737 000146 000302 MOV #146, SFATAL MOVE TO MAILBOX # *eeaeee 146 seeeeee 
007460 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
007462 000000 HALT ‘PRIORITY NOT ZERO 
*TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 726 
1 007464 012706 000500 9$: MOV SP 
B62 007470 012737 007506 000014 MOV n0S RTRAPG 
863 007476 012737 000357 000016 MOV #357_.RTRAPG+2  ;SET NEW "'CC’’ AND PRIORITY 


61 


—— eS ee 


5 






CKKABCO_ 11/44 TRAPS MACRO M1113 eer 12:47 PAGE 52-1 SEQUENCE 62 


TEST #37 = TEST THAT ‘NEW’ STATUS IS CORRE 





864 0075 000003 TRT ; TRAP HERE 
865 007506 10$: 
0075 00405 BMI 11$ 
007510 012757 000147 000302 MOV #147,$FATAL MOVE TO MAILBOX # s#exeee 147 eeennee 
007516 521 INC (R2) og ae hg TO FATAL ERROR 
0075 HALT T SET 
‘To SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 707 
866 007522 11$: 
007522 001405 BEQ 123 
007524 012737 000150 000302 MOV #150, $FATAL MOVE TO MAILBOX # seaaxee 150 seeweee 
007532 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
75 000000 HALT 32 NOT SET 
370 SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 701 
867 007536 12$: 
0075 102405 BVS 13$ 
007540 012737 000151 000302 MOV #151, $FATAL MOVE TO MAILBOX # **eeeee 8151 eeeeeee 
007546 5212 iNC (R2) ;SET MSGTYP TO FATAL ERROR 
607550 HALT :V_NOT SET 
3TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 673 
868 007552 13$: 
007552 103405 BCS 14$ 
007554 012737 000152 900302 MOV #152, $FATAL MOVE TO MAILBOX # *eexeee 152 xeeenne 
007562 5212 INC (R2) gh “git TO FATAL ERROR 
007564 HALT :C NOT SET 
TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 665 
869 007566 013706 177776 148: MOV CC,SP 
870 007572 042706 000017 BIC #17,SP 
871 007576 022706 00034 CMP #340,SP 
872 007602 001405 BEQ 16$ 
007604 15$: 
007604 012737 000153 000302 MOV #153, $FATAL MOVE TO MAILBOX # seexxee 1535 xeeeene 
007612 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
007614 HALT SPRIORITY WAS CHANGED,OR WRONG $TSTNM 
;TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 651 
873 007616 012737 000016 000014 16$: MOV #16,14 
005037 000016 CLR 16 


874 007624 
875 


:PDP-11 ILLEGAL AND ADDRESS INSTRUCTION TEST 


ZALL INSTRUCTIONS Lr ARE ILL c- 


HOULD TRAP TO LOCATION 10, AND THE 
PC THAT POINTS TO THE TRAPPING INSTRUCTION 
SHOULD BE PLACED ON THE STACK 


er eng SR SS 


















882 


007630 Eat eA 000001 
thor 012737 000177 


000001 
7660 005237 000304 
000040 


012706 000500 
7700 aT AE 4 007722 


885 007706 0001 

886 007710 012757 000154 
007716 005212 
007720 

887 007722 


177766 
000302 


177766 
000304 


000010 
000302 


CKKABCO 11/44 TRAPS MACRO M1113 23-APR-81 12:47 PAGE 53 
TEST #40 = TEST THAT A TRAP OCCURS ON AN ILLEGAL INS 


SEQUENCE 


.SBITL TEST #40 = TEST THAT A TRAP OCCURS ON AN ILLEGAL INS 


Reseremerstevecsmrrotrrrtererreryrrrrrer i er rer rrr trriri te re 


:TEST 40 = TEST THAT A TRAP OCCURS ON AN ILLEGAL INS 


PrrererrerrrrrrrTrTTTITTTI ITT TT Tit ttt itt tte 


TST40: 


100$: 


#1, CPUERR 

100$ 

#177, SFATAL 

(R2) 

#1, — 

$TEST 

#40, STESTN 
41-12 


BUFF ,SP 
os »RTRAP 


0 
#154, $FATAL 
(R2) 


7 SEE 4 BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
;BRANCH AROUND CLEAR AND HALT IF CLEAR 

MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
ZSET MSGTYP TO FATAL ERROR 


;BRAN 
; STACK POINTER SETUP 
URN LOC: 


RE ION 

piece. INS’ UUCTION, SHOULD TRAP 

“MOVE T MAILBOX # xeexeee 154 Keeenee 

SET MSGTYP TO FATAL ERROR 

ILLEGAL INSTRUCTION DIDN'T TRAP,OR WRONG STSTNM 
:TO SCOPE REPLACE HALT WITH 240 

+ AND REPLACE NEXT INST WITH 764 


63 




















888 


CKKABCO 11/44 TRAPS 


032737 
0 


000500 
010002 
000474 
000155 


177766 
000302 


177766 
000304 


000010 


000302 


MACRO M1113 23-APR-81 Me: oA PAGE 54 
TEST #41 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


SEQUENCE 


.SBTTL TEST #41 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


PRR EERE RE RRR ERERE ER A EEE ER ERE RAR EERE EERE RARER ERE 


STEST 41 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


Preerrerrr Tere TTT TT TTC TTT TTT T ITT TTT TLL TTL Le 


TST41: 


100$: 


BIT 


#1,CPUERR 
100$ 

#177, $FATAL 
(R2) 

#1, CPUERR 
$TESTN 
#41,$TESTN 
TST42-12 
#BUFF , SP 
#1$,RTRAP 
RO 

SP ,ABUF F -4 
TST42 
#155, $FATAL 
(R2) 


+SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
(CH AROUND CLEAR AND HALT IF CLEAR 

“MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 

3;SET MSGTYP TO FATAL ERROR 

;CPU POWER BIT FOUND SET 

[CLEAR THE BIT FOUND SET 

[UPDATE TEST NUMBER 


; SEQUENCE ERROR? 
CH TO ERROR HALT ON SEQ ERROR 
7 STACK POINTER SETUP 
:RETURN POINTER 
SRESERVED INSTRUCTION 
TEST DECREMENT OF SP 


ZMOVE TO MAILBOX # *texexe 155 xeeeene 
SET MSGTYP TO FATAL ERROR 

[NOT DECREMENTED TWO WORDS,OR WRONG $TSTNM 
[TO SCOPE REPLACE HALT WITH 240 

SAND REPLACE NEXT INST WITH 761 


























894 


898 010102 
899 pets 
010112 
010120 
010122 


CKKABCO_ 11/44 TRAPS 
TEST #42 = TEST THAT PROPER P.C. 


032737 


000001 
000177 
000001 
000394 
000042 


000500 
010102 


010102 
000156 


IS SAV 


177766 
000302 


177766 
000304 


000010 
000474 
000302 


N 5 


MACRO M1113 caornes 12:47 PAGE 55 SEQUENCE 65 


.SBTTL TEST #42 = TEST THAT PROPER P.C. IS SAVED 


TSAO EIEIO IOISIEIAITISISISIITIEIISISIIIOIOIIOOIOIOISISISISIOOIOITISIEI ISI IIIT I TT TT TT 


[TEST 42 = TEST THAT PROPER P.C. IS SAVED 


Peer TerTT TT Teer TTT TITITITTL TITTLE LLL LLL LLL LLL 


TST42: BIT #1 ,CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
BEQ 100$ BRANCH AROUND CLEAR AND HALT IF CLEAR 
MOV #177, $FATAL [MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
INC (R2) ;SET MSGTYP TO FATAL ERROR 
HALT [CPU POWER BIT FOUND SET 
BIC #1, ~~ [CLEAR THE BIT FOUND SET 
100$: INC $TE [UPDATE TEST NUMBER 
CMP me, STESTN ;SEQUENCE ERROR? 
BNE ST43-12 ;BRANCH TO ERROR HALT ON SEQ ERROR 
MOV PBUFF SP + STACK POINTER SETUP 
MOV #1$,RTRAP RETURN FROM TRAP POINTER 
JMP RO STRAP ON THIS INSTRUCTION 
1$: CMP #. BUFF <4 SCHECK FOR INCREMENTED P.C. 
BEQ TST43 
MOV #156, $F ATAL MOVE TO MAILBOX # *eexeee 156 HeRER HR 
INC (R2) SET MSGTYP TO FATAL ERROR 
HALT INCORRECT P.C.,OR WRONG $TSTNM 


7TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WiTH 760 


CKKABCO_11/44 TRAPS MACRO M1115 23-APR=-81 12:47 PAGE 56 SEQUENCE 66 


TEST #43 = TEST THAT “OLD’’ CC AND PRI ARE PLACED ON STACK 
900 .SBTTL TEST #43 = TEST THAT ‘‘OLD’’ CC AND PRI ARE PLACED ON STACK 


{REAR RERAA RARER AREER E EERE ARERR RRR REA EAA EER ERA AR RARER EERE RARE ES 


[TEST 43 = TEST THAT ‘‘OLD'' CC AND PRI ARE PLACED ON STACK 


PrrrrrrerrrTrTTT TTT TTI TTT LITT TTLiLi LLL LiL 


010124 032737 000001 177766 TST43: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
010132 001410 BEQ 100$ (CH AROUND CLEAR AND HALT IF CLEAR 
10134 012737 000177 000302 MOV #177, SFATAL “MOVE SPECIAL POWER ITOR FATAL # TO $FATAL 
610142 005212 INC (R2) ;SET MSGTYP_ TO FATAL ERROR 
010144 HALT [CPU POWER BIT FOUND SET 
10146 042737 000001 177766 BIC #1 ,CPUERR [CLEAR THE BIT FOUND SET 
010154 5237 000304 100$: INC STESTN [UPDATE TEST NUMBER 
010160- 022737 000043 000304 CMP #43 ,$TESTN 7 SEQUENCE ERROR? 
010166 001040 BNE TST44=12 BRANCH TO ERROR HALT ON SEQ ERROR 
901 010170 012706 000500 MOV MBUFF , SP SET UP 
902 010174 012737 010212 000010 MOV #1$,RTRAP ;SET UP 
903 010202 005037 177776 CLR cc CLEAR CC AND PRIORITY 
904 010206 257 ccc 
905 010210 1 JMP RO ; TRAP 
010212 023727 000476 000000 1$: CMP BUFF -2,40 ;TEST THAT OLD STATUS WENT TO STACK 
907 010220 001405 BEQ 
010222 012737 000157 000302 MOV #157, $FATAL MOVE TO MAILBOX # sxxxeee 157 seenene 
010230 5212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
010232 HALT ; INCORRECT STATUS 
;TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 755 
908 010234 012706 000500 2$: MOV #BUFF , SP 7SET UP 
909 010240 012737 010260 000010 MOV #3$ ,RTRAP 7SET UP 
910 010246 012737 000357 177776 MOV #357..CC SET PRIORITY 
911 010254 000277 Scc :SET CC 
912 010256 000100 JMP RO ; TRAP 
913 010260 023727 000476 000357 3$: CMP BUF F =2 ,#357 COMPARES STATUS ON STACK 
914 010266 001405 BEQ TST44 
010270 012737 000160 000302 MOV #160,$FATAL MOVE TO MAILBOX # *eexeee 160 9 eeeeene 
610276 005212 INC (R2) : ;SET MSGTYP TO FATAL ERROR 
010 0 HALT T INCORRECT STATUS ON STACK,OR WRONG $TSTNM 
[TO SCOPE REPLACE HALT WITH 240 


ZAND REPLACE NEXT INST WITH 732 









CKKABCO 11/44 TRAPS MACRO M1113 [she 12:47 PAGE 57 SECUENCE 
TEST #44 = TEST THAT ‘NEW’ STATUS IS CORRECT 


915 .SBTTL TEST #44 = TEST THAT ‘NEW’ STATUS IS CORRECT 


Erdington ncn lnlatiniailariaiainiainiaiel 


[TEST 44 = TEST THAT ''NEW'’ STATUS IS CORRECT 


TEESE SIEISIEISI AISI SIOIUIOIOIOICI SIO ICICI TTI IITA I IIIS IAAI IIIA 


010302 032737 000001 177766 TST44: BIT #1 ,CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
010310 001410 BEQ 100$ [BRANCH AROUND CLEAR AND HALT IF CLEAR 
010312 012737 000177 000302 MOV #177, $FATAL ZMOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
010320 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
010322 000000 HALT 7CPU POWER BIT FOUND SET 
010324 042737 000001 177766 BIC #1, CPUERR ;CLEAR THE BIT FOUND SET 
010332 005237 000304 100$: INC S$TESTN UPDATE TEST NUMBER 
010336 022737 000044 000304 CMP #44 ,STESTN ;SEQUENCE ERROR 
010344 001402 BEQ 1000$ BRANCH OVER ERROR HALT ON SEQ ERROR ig IF OK 
010346 000137 010610 JMP TST45=12 ; JUMP TO ERROR HALT ON SEQ ERROR 
010352 1000$: 
916 010352 012706 000500 V ABUF F nt 
917 010356 012737 010372 000010 MOV #1$,RTR 
918 010364 005037 000012 CLR RIRAPSS CLEAR FUTURE PRIORITY AND CC 
919 010370 000100 JMP RO 
920 010372 1$: ;TEST FOR "'C’* CLEARED 
921 010372 100005 BPL 2s 
010374 012737 000161 000302 MOV #161, $FATAL sMOVE TO MAILBOX # xeexKee 16] KR KEER 
010402 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
010404 000000 HALT :C NOT CLEARED 
3TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 761 
922 010406 2$: 
010406 001005 BNE 3$ 
010410 012737 000162 000302 MOV #162, $F ATAL ;MOVE TO MAILBOX weaken 162 seek 
010416 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
010420 000000 HALT :Z_ NOT CLEARED 
3TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 753 
923 010422 3$: 
010422 102005 BVC 4$ 
- 010424 012737 000163 000302 MOV #163,$FATAL MOVE TO MAILBOX # xkaexee 165 teKEEER 
010432 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
010434 000000 HALT 3;V_NOT CLEARED 
[TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST W1fH 745 
924 010436 4$: 
010436 103005 BCC 5$ 
010440 012737 000164 000302 MOV #164,$F ATAL :MOVE TO MAILBOX # kkeKeee 8164 tHRKHE 
010446 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
010450 000000 HALT :C NOT CLEARED 
[TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 737 
925 010452 032737 000357 177776 S$: BIT #357,CC TEST PRIORITY 
926 010460 001405 BEQ 
010462 012737 000165 000302 MOV #165, $FATAL MOVE TO MAILBOX # tkeeeee 165 teeneee 
010470 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
010472 000000 HALT :PRIORITY NOT ZERO 
7TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 726 
927 010474 012706 000500 6$: MOV #BUFF , SP 
928 010500 012737 010516 000010 MOV #7$,RTRAP 
929 010506 012737 000357 000012 MOV #357, ,RTRAP+2 7SET NEW ‘'CC’* AND PRIORITY 


-———_—— 


CKKABCO 11/44 get 


TEST #44 = TEST 


930 010514 
931 010516 
010516 


010534 
010542 
010544 


932 010532 
010532 

933 010546 
010546 
010550 
010556 
010560 

934 010562 


010574 


935 010576 
936 010602 
937 010606 


MACRO M1113 fee 12:47 
T "NEW’’ STATUS IS CORREC 


000166 


000167 


000170 


000171 


177776 
000357 


000172 


000302 


000302 


000302 


000302 


000302 


7$: 


8$: 


9$: 


10$: 


11$: 


JMP 


PAGE 57-1 


RO 


8$ 

#166,SF ATAL 
(R2) 

9$ 

#167, $FATAL 
(R2) 

10$ 
#170, $F ATAL 
(R2) 


11$ 
#171,$F ATAL 
(R2) 


CC, SP 
#357,SP 


TST45 
#172, $FATAL 
(R2) 


6 


; TRAP HERE 


;MOVE TO MAILBOX # *eeanwe 
:SET ap Hh TO FATAL ERROR 


166 


N NOT 
Mo SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 707 


sMOVE TO MAILBOX # **eeeKe 
set ag Ag TO FATAL ERROR 


167 


:Z_NOT SE 
;TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 701 


s;MOVE TO MAILBOX # **xxxne 
;SET MSGTYP TO FATAL ERROR 
:V NOT SET 


170 


7TO SCOPE REPLACE HALT WITH 240 
[AND REPLACE NEXT INST WITH 673 


sMOVE TO MAILBOX # ***xxx® 
see or ser TO FATAL ERROR 


171 


E 
TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 665 


;MOVE TO MAILBOX # *exeKKe 
:SET MSGTYP TO FATAL ERROR 


172 


SEQUENCE 


RHERRER 


RERKEEK 


RERKKKK 


KRKKKKH 


REKKEKKEK 


[PRIORITY WAS CHANGED,OR WRONG $TSTNM 
;TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 653 





E 6 


CKKABCO 11/44 TRAPS MACRO M1113 23-APR=-81 12:47 PAGE 58 SEQUENCE 
TEST #45 = TEST THAT A TRAP OCCURES ON ALL ILLEGAL INS 
938 .SBTTL TEST #45 = TEST THAT A TRAP OCCURES ON ALL ILLEGAL INS 


{REAR ERR A RARER AAA AAAA AAA RARER ARERR ERE ARERR ARERR EES ES 


:TEST 45 = TEST THAT A TRAP OCCURES ON ALL ILLEGAL INS 


PPeereerrrrTrrrrTrTT TTT TTT TTT TILT LLL ELL LL 


010622 032737 000001 177766 TST45: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
010630 001410 BEO 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
010632 012737 000177 000302: MOV #177, $F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
010640 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
010642 000000 HALT :CPU POWER BIT FOUND SFT 
010644 042737 000001 177766 BIC #1, CPUERR CLEAR THE BIT FOUND SET 
010652 005237 000304 100$: INC 1 $TEST ‘UPDATE TEST NUMBER 
010656 022737 000045 000304 (MPC #45 STESTN * SEQUENCE ERROR? 

010664 001006 BNE ST46-12 sBRANCH TO ERROR HALT ON SEQ ERROR 

939 010666 012706 000500 MOV eu FF ,SP zSTACK POINTER SETUP 

940 010672 012737 010714 000010 MOV #8, RTRAP *RETURN LOCATION 

941 010700 004000 JSR SRESERVED INS, SHOULD TRAP 

942 010702 012737 000173 000302 MOV BO oe SFATAL “MOVE TO MAILBOX # *xtexee 173 seaeeee 
010710 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
010712 000000 HALT “DIDN'T TRAP,OR WRONG STSTNM 


AM SCOPE REPLACE HALT WITH 240 
AND REPLACE NEXT INST WITH 764 
943 010714 1$: 


F 6 
CKKABCO 11/44 TRAPS MACRO M1113 23-APR-81 12:47 PAGE 59 SEQUENCE 
TEST #46 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 
944 .SBTTL TEST #46 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


[ARRRRRRRRRERERERA RAE A EEE RR AERA AERA A RARER A ERT R RATA RATA ARTA Tee 


STEST 46 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


Pee ee) 
PPPTTTPCTTTTITTITTI TILL LL LL LLL LLL LLL LE lllellebleleleieielel 
010714 032737 000001 177766 TST46: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 


010722 001410 BEQ 100$ :BRAN (CH AROUND CLEAR AND HALT IF CLEAR 
010724 012737 000177 000302 MOV #177, SFATAL MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
010732 005212 INC (R2) Set MSGTYP TO FATAL ERROR 
010734 000000 HALT :CPU POWER BIT FOUND SFT 
010736 042737 000001 177766 BIC #1, — ZCLEAR THE BIT FOUND SET 
010744 005237 000304 100$: INC $TESTN [UPDATE TEST NUMBER 
010750 022737 000046 000304 cmr oes STESTN ; SEQUENCE ERROR? 
010756 001011 ONE ST47=12 ;BRANCH TO ERROR HALT ON SEQ ERROR 
945 010760 012706 000500 MOV PRUF F,SP i STACK POINTER SETUP 
946 010764 012737 010774 000010 MOV #1$,RTRAP ;RETURN POINTER 
947 010772 004000 JSR RO,RO ;RESERVED INS 
948 Ay thes 020627 000474 1$: CMP ayer TEST DECREMENT OF SP 


405 TST4 
011002 012737 000174 000302 MOV #174, $FATAL MOVE TO MAILBOX # seeeeee 174 sheeene 
611010 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
011012 000000 HALT ZNOT DECREMENTED TWO WORDS,OR WRONG $TSTNM 
TO SCOPE REPLACE HALT WITH 240 
[AND REPLACE NEXT INST WITH 761 


(7a re OC Se 


| CKKABCO_11/44 TRAPS MACRO Mi113 —e 12:47 PAGE 60 SEQUENCE 


| TEST #47 = TEST THAT PROPER P.C. IS SAVED 
950 \SBITL TEST #47 = TEST THAT PROPER P.C. IS SAVED 
{ERAAAAAA ERA EE RAR RAR AEE AA REAR RAA EAA RRA REAR AR AA ERE ERA AA AERA EERE ES 
“TEST 47 = TEST THAT PROPER P.C. IS SAVED 
| PreerrererrTTerrTT TT TTT TTT TOTTI TIT T TTT L it L iii t iii 
011014 032737 000001 177766 {ST47: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
011022 001410 BEO 100$ ‘BRANCH AROUND CLEAR AND HALT IF CLEAR 
011024 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
011032 005212 INC (R2) SSET MSGTYP TO FATAL ERROR 
011034 000000 HALT ‘CPU POWER BIT FOUND SFT 
011036 042737 000001 177746 BIC #1, CPUERR [CLEAR THE BIT FOUND SET 
011044 005237 000304 100$: INC $TESTN ‘UPDATE TEST NUMBER 
011050 022737 000047 000304 CMP #47,$TESIN s SEQUENCE ERROR? 
011056 001012 BNE TST50-12 ;BRANCH TO ERROR HALT ON SEQ ERROR 
951 011060 012706 000500 MOV #BUFF , 3 ;STACK POINTER SETUP 
952 011064 012737 011074 000010 MOV #1$,RTRAP RETURN FROM TRAP POINTER 
953 011072 004000 JSR RO,RO STRAP ON THIS INS 
954 011074 022737 011074 000474 1S: CMP #1$,BUFF=-4 SCHECK FOR INCREMENED P.C. 
955 011102 0014 BEQ TST50 
0111046 012737 000175 000302 MOV #175, $FATAL :MOVE TO MAILBOX # *eexeee 175 seeeene 
611112 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
011114 000000 HALT ‘INCORRECT P.C.,0R WRONG $TSTNM 


TO SCOPE REPLACE HALT WITH 240 
956 TAND REPLACE NEXT INST WITH 760 


--:- + + OO ere ee a Ce Ce 


| 4 6 


| CKKABCO 11/44 TRAPS MACRO M1113 23-APR=81 12:47 PAGE 61 SEQUENCE 
| TEST #50 = TEST THAT “OLD’’ CC AND PRI ARE PLACED ON STACK 
957 _SBITL TEST #50 = TTST THAT ‘OLD’ CC AND PRI ARE PLACED ON STACK 
{RARER RARER RA EATER A AAA AR AAA AR AAA R AAA RAAAA AAA AR AREA RAR RS ERLE R ELSES 
:TEST 50 = TEST THAT "‘OLD'’ CC AND PRI ARE PLACED ON STACK 
© RRR RARER ERE EE ERE REREREEEEREEAAEREREERES 
011116 032737 000001 177766 TST50: BIT #1, CPUERR sSEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
011124 001410 BEQ 100$ ‘BRANCH AROUND CLEAR AND HALT IF CLEAR 
011126 012737 000177 000302 MOV #177,$FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
011134 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
011136 HALT :CPU POWER BIT FOUND SFT 
011140 042737 000001 177766 BIC #1, CPUERR [CLEAR THE BIT FOUND SET 
011146 005237 000304 100$: INC $TESIN [UPDATE TEST NUMBER 
011152 022737 000050 000304 CMP #50, $TESTN * SEQUENCE ERROR? 
011160 001040 BNE TST5§1-12 ;BRANCH TO ERROR HALT ON SEQ ERROR 
958 011162 012706 000500 MOV #BUFF , SP :SET UP 
959 011166 012737 011204 000010 MOV #1$,RTRAP :SET UP 
960 011174 005037 177776 CLR cc SCLEAR CC AND PRIORITY 
961 011200 257 aaa 
962 011202 000 JSR RO,RO : TRAP 
963 0112046 023727 000476 000000 1$: CMP BUF F-2,#0 :TEST THAT OLD STATUS WENT TO STACK 
964 011212 001405 BEQ 
011214 012737 000176 000302 MOV #176, $FATAL :MOVE TO MAILBOX # *#eeeee 176 seeweee 
011222 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
011224 HALT *INCORRCT STATUS 


TO SCOPE REPLACE HALT WITH 240 
zAND REPLACE NEXT INST WITH 755 


11226 012706 000500 2s: MOV #BUFF , SP :SET UP 
11232 012737 011252 000010 MOV #3$,RTRAP :SET UP 
11240 012737 000357 177776 MOV #357,CC ‘SET PRIORITY 
11246 000277 SCC TSET CC 
969 011250 004000 JSR RO,RO + TRAP 
970 011252 023727 000476 000357 38: CMP BUFF -2,4357 ‘COMPARES STATUS ON STACK 
971 011260 001405 BEQ TST 
11262 012737 000177 000302 MOV #177, $F ATAL :MOVE TO MAILBOX # *aeeeee 177 senenee 
11270 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
11272 000000 HALT S INCORRECT STATUS ON STACK,OR WRONG $TSTNM 


3TO SCOPE REPLACE HALT WITH 240 
zAND REPLACE NEXT INST WITH 732 


: 
965 0 
966 0 
967 0 
968 0 
0 
0 
0 
0 
0 
0 


72 


| I 6 
| CKKABCO 117464 TRAPS MACRO M1113 23-APR-81 12:47 PAGE 62 SEQUENCE 
TEST #51 = TEST THAT NEW STATUS IS CORRECT 
972 .SBTTL TEST #51 = TEST THAT ‘NEW’ STATUS IS CORRECT 
| ert es bald laledalalalallebalalaibababaleibebalaieiebababaiaiebeiaiale 
| STEST 51 = TEST THAT ‘NEW’ STATUS IS CORRECT 
: PrrerrerrrrrrerrTrTTTTTITITITITIITIiLiti LiL 
011274 032737 000001 177766 1S151: BIT #1, CPUERR sSEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
011302 001410 BEQ 100$ ;BRANCH H AROUND CLEAR AND HALT IF CLEAR 
011304 012737 000177 000302 MOV #177, SF ATAL MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
011312 005212 INC (R2) eer MSGTYP TO FATAL ERROR 
011314 000000 HALT :CPU POWER BIT FOUND SET 
011316 042737 000001 177766 BIC #1, CPUERR =CLEAR THE BIT FOUND SET 
01132 005237 000304 100$: INC STESTN ZUPDATE TEST NUMBER 
011330 022737 000051 000304 CMP #51,$TESTN sSEQUENCE ERROR? 
011336 001402 BEQ 1000$ SBRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
011340 137 011600 JMP TST52=12 ; JUMP TO ERROR HALT ON SEQ ERROR 
011344 1000$: 
973 011344 012706 MOV #BUFF SP 
974 011350 012737 011364 000010 MOV #1$,.RTRAP 
975 011356 005037 CLR RTRAP+2 ZCLEAR FUTURE PRIORITY AND CC 
976 011362 004000 JSR RO,RO 
977 611364 1$: :TEST FOR ‘'C’* CLEARED 
978 011364 100005 BPL 23 
011366 012737 000200 000302 MOV #200, SFATAL sMOVE TO MAILBOX # sxeeeee 200 seeeeee 
011374 005212 INC (R2) [SET MSGTYP TO FATAL ERROR 
011376 HALT :C NOT CLEARED 
*TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 761 
979 011400 2s: 
011400 001005 BNE 3$ 
011402 012737 000201 000302 MOV #201, SFATAL :MOVE TO MAILBOX # seeeeee 201 seeeene 
011410 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
011412 000000 HALT :Z NOT CLEARED 
>TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 753 
980 011414 3$: 
011414 102005 BVC 4$ 
011416 012737 000202 000302 MOV #202, $F ATAL :MOVE TO MAILBOX # tteeeee 202 seeeeee 
011424 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
011426 000000 HALT :V NOT CLEARED 
:TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 745 
981 011430 4$ 
11430 103005 BCC 5$ 
011432 012737 000203 000302 MOV #203, $F ATAL sMOVE TO MAILBOX # seeexee 203 seeeeee 
011440 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
011442 000000 HALT :C NOT CLEARED 
:T0 SCOPE REPLACE HALT WITH 240 
AND REPLACE NEXT INST WITH 737 
982 011 013700 177776 5$: MOV CC.RO TENP STORAGE 
983 011450 001405 BEQ 
011452 012737 000204 000302 MOV #204, SFATAL sMOVE TO MAILBOX # seeeexe 204 seeeeee 
011460 005212 INC (R2) [SET MSGTYP TO FATAL ERROR 
011 000000 HALT :PRIORITY NOT ZERO 
*TO SCOPE REPLACE HALT WITH 340 
SAND REPLACE NEXT INST WITH 727 
984 011464 012706 000500 6$: MOV WBUFF SP 
985 011470 012737 011506 000010 MOV #7$,.RTRAP 
986 011476 012737 000357 000012 MOV #357, RTRAP+2 :SET NEW ‘’CC’* AND PRIORITY 


8 
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ee eed 
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DASA 
mn 
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CKKABCO 11/46 a # 
TEST #51 = TEST 


MACRO M1113 cece 12:47 PAGE 62-1 
T “NEW’’ STATUS IS CORREC 


000205 


000207 


000210 


177776 
000357 


000211 


000302 


000302 


000302 


000302 


000302 


7$: 


8$: 


9$: 


10$: 


11$: 


JSR 


RO,RO 


&$ 

#205, SFATAL 
(R2) 

9$ 
#206, $F ATAL 
(R2) 

10$ 
#207, $F ATAL 
(R2) 

11$ 

#210, SFATAL 
(R2) 


CC,RO 
#357,RO 
TSTS 

#211, $F ATAL 
(R2) 


; TRAP HERE 


sMOVE TO MAILBOX # s#eeee8 
;SET MSGTYP TO FATAL ERROR 
:N NOT SET 


TO SCOPE REPLACE HALT WITH 2 


SAND REPLACE NEXT INST WITH 
sMOVE TO MAILBOX # *eeee08 
2SET He hg TO FATAL ERROR 
:To SCOPE REPLACE HALT WITH 
ZAND REPLACE NEXT INST WITH 


MOVE TO MAILBOX # *xeeee88 
see or ser” TO FATAL ERROR 


T SET 
TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 674 


sMOVE TO MAILBOX # *«#exe08 
sSET Hu hg TO FATAL ERROR 


210 


:TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 666 


sMOVE TO MAILBOX # *#*ee08 
;SET MSGTYP TO FATAL ERROR 


211 


aaeeneee 


eeaaenee 


[PRIORITY WAS CHANGED,OR WRONG $STSTNM 
;TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 654 


SEQUENCE 


?4 





K 6 
ge 11/44 TRAPS MACRO aoe 3-APR-81 12:47 PAGE 63 SEQUENCE 75 


2 
T #52 = TEST THAT A TRAP OCCURES ON AN ILLEGAL ADDRESS 
996 .SBTTL TEST #52 = TEST THAT A TRAP OCCURES ON AN ILLEGAL ADDRESS 


RRAAAARA ERA ARERR AAA AREA AAA AAA AAA A AAA A AAA A AAR AARARARAERAERAA ERE REESE 


[TEST 52 = TEST THAT A TRAP OCCURES ON AN ILLEGAL ADDRESS 


PPrrrrrrrrrrrTrrTTTTTTTITITI TTT Li TLLL LLL LLL Lhe 


011612 032337 000001 177766 TsT52: BIT #1, CPUERR +SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
011620 001410 BEQ 100$ (CH AROUND CLEAR AND HALT IF CLEAR 
011622 012737 000177 000302 MOV #177, SFATAL ?MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
011630 005212 INC (R2) sSET MSGTYP TO FATAL ERROR 
011632 HALT POWER BIT FOUND SET 
011634 ns 3 Th 000001 177766 BIC #1, CPUERR CLEAR THE BIT FOUND SET 
011642 0052 000304 100$: INC STESTN UPDATE TEST NUMBE 
011646 022737 000052 000304 CMP #52,$TESIN SEQUENCE ERROR? 
011654 00104 BNE 3$ BRANCH TO ERROR HALT ON SEQ ERROR 
997 011656 005037 177766 CLR CPUERR TCLEAR CPU ERROR REGISTER 
998 011662 005737 177766 TST CPUERR ;VERIFY THAT IT CLEARED 
999 011666 001405 BEQ 1$ 
011670 012737 000212 000302 MOV #212, $FATAL MOVE TO MAILBOX # sexxeee 212 seeeeee 
011676 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
011700 HALT CPU ERROR REG FAILED TO CLEAR 
7TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 765 
1000 011702 012706 0500 1$: MOV #BUFF , SP STACK trv SETUP 
1001 011706 012737 011732 000004 MOV #2$ ,RTRAPS ;RETURN LOCATION 
1002 011714 5737 000001 TST 1 ILLEGAL ADDRESS INS, SHOULD T 
1003 011720 012737 213 000302 MOV #213, $FATAL ;MOVE TO MAILBOX # *xxxxee ee aanenen 
011726 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
011730 HALT TILLEGAL ADDRESS DI TT 
7TO SCOPE REPLACE HALT WITH 240 
[AND REPLACE NEXT INST WITH 751 
1004 011732 2$: 
1005 011732 013737 177766 000502 MOV CPUERR,RCPUER ;READ AND SAVE CPU ERROR REGISTER 
1006 011740 042737 177413 000502 BIC #CERMSK,RCPUER :MASK OFF UNUSED BITS OF CPU ERROR REG 
1007 011746 022737 000100 000502 CMP #100,RCPUER ;O0DD ADDRESS BIT SET? 
1008 Ate 001405 3s BEQ 4$ 
011756 012737 000214 000302 MOV #214, $F ATAL MOVE TO MAILBOX # **eexee 214 teeweee 
011764 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
011766 000000 HALT ; INCORRECT CPU ERROR REG CONTENTS, OR WRONG STSTNM 
TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 732 
005037 177766 4$: CLR CPUERR CLEAR ODD ADDRESS BIT 


1009 011770 
1010 






















CKKABCO_11/44 TRAPS MACRO M1113 23-APR-81 is: 4 PAGE 64 SEQUENCE 
TEST #53 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 
1011 .SBTTL TEST #53 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


eerie titties ee LLL dlololeleladalalalalalelebalalalaieiedel 


zTEST 53 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


PPrrrrerrrT Tee TTT TTT TTT TTT TTT TTT LITLE LLLL LLL ts 


011774 032737 000001 177766 TST53: BIT #1, CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
012002 001410 BEQ 100$ BRANCH AROUND CLEAR AND HALT IF CLEAR 
012004 012737 000177 000302 MOV #177,$FATAL ;MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
012012 005212 - INC (R2) SET MSGTYP TO FATAL ERROR 
012014 000000. HALT [CPU POWER BIT FOUND SET 
012016 042737 ‘000001 177766 BIC #1, — [CLEAR THE BIT FOUND SET 
012024 005237 000304 100$: INC $TEST [UPDATE TEST NUMBER 
012030 022737 000053 000304 CMP Fee STESTN ;SEQUENCE ERROR? 
012036 001012 BNE ST44 4-1 ;BRANCH TO ERROR HALT ON SEQ ERROR 
1012 012040 012706 000500 MOV PauFF °$p 2 STACK POINTER SETUP 
1013 012044 012737 012056 000004 MOV #1$,RTRAPS ;RETURN POINTER 
1014 012052 005737 000001 TST 1 SRESERVED INS 
1015 012056 020627 000474 1$: CMP SP , ABUF F -4 TEST DECREMENT OF SP 
1016 012062 001405 BEQ TST54 
012064 012737 000215 000302 MOV #215, $FATAL MOVE TO MAILBOX # *eexeee 215 teeeeee 
612072 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
012074 000000 HALT :NOT DECREMENTED TWO WORDS,OR WRONG $TSTNM 


TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 760 





76 


ee ee 
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CKKABCO 11/44 TRAPS MACRO M1113 hat 12:47 PAGE 65 SEQUENCE 
TEST #54 = TEST THAT PROPER P.C. IS SAVED 
1017 -SBTTL TEST #54 = TEST THAT PROPER P.C. IS SAVED 


RRR RARER EEA R EERE RARER RAR ERE REE RRA R ES 


:TEST 54 = TEST THAT PROPER P.C. IS SAVED 


« eRRERRERERERARERREREREERERRRRE RRR EREERR EERE RRR ERERE ERR 


012076 032737 000001 177766 TST54: BIT #1,CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
012104 001410 BEQ 100$ ‘BRANCH AROUND CLEAR AND HALT IF CLEAR 
012106 012737 000177 000302 MOV #177, $F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
012114 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
012116 000000 HALT ‘CPU POWER BIT FOUND SET 
012120 042737 000001 177766 BIC #1, CPUERR ‘CLEAR THE BIT FOUND SET 
012126 005237 000304 100$: INC $TESTN ‘UPDATE TEST NUMBER 
012132 022737 000054 000304 CMP #94 STESTN S SEQUENCE ERROR? 
012140 001013 BNE IST 5-1 ;BRANCH TO ERROR HALT ON SEQ ERROR 
1018 012142 012706 000500 MOV rage: - STACK POINTER SETUP 
1019 012146 012737 012160 000004 MOV Fis RIREPS ‘RETURN FROM TRAP POINTER 
1020 012154 005737 000001 TST 1 STRAP ON THIS INSTRUCTION 
1021 012160 022737 012160 000474 1$: CMP #1$,BUFF-4 “CHECK FOR INCREMENTED P.C. 
1022 012166 001405 BEQ TST55 
012170 012737 000216 000302 MOV #216, $FATAL :MOVE TO MAILBOX # *eeeeee 216 teeenee 
612176 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
012200 000 HALT ‘INCORRECT P.C.,OR WRONG $TSTNM 


:TO SCOPE REPLACE HALT WITH 240 
[AND REPLACE NEXT INST WITH 757 


77 


sale RGR ERE a SIONS Sat a GR cialno aN", ia, Caem a 





‘Bes Se HB SRT e-paper a a er eee 
N 


CKKABCO 11/44 TRAPS MACRO M1113 _23-APR-81 12:47 PAGE 66 
TEST #55 = TEST THAT “OLD’’ CC AND PRI ARE PLACED ON STACK 


SEQUENCE 


SS Se tS 


1023 .SBTTL TEST #55 = TEST THAT ‘‘OLD’’ CC AND PRI ARE PLACED ON STACK 
sdonndenasnosecesareceseoesessesraneedssensesoneseseolese eS 
STEST 55 = TEST THAT ‘‘OLD’’ CC AND PRI ARE PLACED ON STACK 
PrrrrrerrrrerTrrrr TTT TTT TT TTT TTT TTT TTT Litt tO 
012202 032737 000001 177766 TST55: BIT #1, CPUERR SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
012210 001410 BEQ 100$ ;BRANCH AR CLEAR AND HALT IF CLEAR 
012212 012737 000177 000302 MOV #177, S$FATAL [MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
012220 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
012222 HALT [CPU POWER BIT FOUND SET 
012224 042737 000001 177766 BIC #1, — CLEAR THE BIT FOUND SET 
012232 005237 000304 100$: INC $TEST UPDATE TEST 
012236 022737 000055 000304 CMP #55 STESTN ;SEQUENCE ERROR? 
012244 001042 BNE TST56-1 ;BRANCH TO ERROR HALT ON SEQ ERROR 
1024 012246 012706 000500 MOV MBUFF , sp 7SET UP 
1025 012252 012737 012272 000004 MOV #1$,.RTRAPS SET UP 
1026 012260 005037 177776 CLR cc CLEAR CC AND PRIORITY 
1027 012264 257 ccc 
1028 012266 5737 000001 TST 1 3 TRAP 
1029 012272 023727 000476 000000 1$: CMP BUF F=2 ,#0 TEST THAT OLD STATUS WENT TO STACK 
1030 0612300 001405 BEQ $ 
012302 012737 000217 000302 MOV #217, $FATAL MOVE TO MAILBOX # *kexeee 217 eeKeee 
012310 005212 INC (R2) TSET MSGTYP TO FATAL ERROR 
012312 HALT ;]NCORRECT STATUS 
770 SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 754 
1031 012314 012706 000500 2$: MOV BUFF , SP : UP 
1032 012320 012737 012342 000004 MOV #3$ ,RTRAPS :SET UP 
103? 012326 012737 000357 177776 MOV #357,CC :SET PRIORITY 
1034 012334 000277 SCC ;SET CC 
19s? 012336 005737 000001 TST 1 : 
1036 012342 023727 000476 000357 3$: CMP BUF F ~2 ,#357 COMPARES STATUS ON STACK 
1037 012350 001405 BEQ TST56 
012352 012737 000220 000302 MOV #220, $FATAL MOVE TO MAILBOX # **xeeee 220 KeERKED 
01 2360 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
012362 000 WALT sINCORRCT STATUS ON STACK,OR WRONG $TSTNM 
;7U0 SCOPE REPLACE HALT WITH 240 





zAND REPLACE NEXT INST WITH 730 


CKKABCO 11/44 TRAPS MACRO M1113 a a 12:47 PAGE 67 SEQUENCE 


TEST #56 = TEST THAT ‘NEW’ STATUS IS CORRECT 





1038 .SBTTL TEST #56 = TEST THAT ‘NEW’ STATUS IS CORRECT 
Sere LL r LLL Lr AEs toa dlalelaletalehetelbabebababptotetelatetetetalaialelelalalaleleleialaleleieiabeleieieieiehele 
i TEST 56 = TEST THAT ‘NEW’ STATUS IS CORRECT 
PreererrrrrerTrrrT TTT TTT TTI TT TTT TIT TIT TLL Litt ie hd | 
012364 032737 000001 177766 {TST56: BIT  § #1,CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
012372 001410 BEQ ©=s« 1008 (CH AROUND CLEAR AND HALT IF CLEAR 
012374 012737 000177 000302 MOV -#177,S$FATAL — :MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
012402 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
012404 HALT CPU POWER BIT FOUND SET 
012406 042737 000001 177766 BIC #1, CPUERR CLEAR THE BIT FOUND SET 
012414 005237 000304 1008: INC  $TESTN ZUPDATE TEST NUMBER 
012420 022737 000056 000304 (MP = «#56, STESTN S SEQUENCE ERROR? 
012426 001402 BEQ  —«- 1000S “BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
012430 000137 012676 IMP ss TST57=12 ; JUMP TO ERROR HALT ON SEQ ERROR 
012434 10008: 
1039 012434 012706 000500 MoV —s#BUFF , SP 
1040 012440 012737 012456 000004 MOV «#18, RTRAPS 
1041 012446 005037 000006 CLR —-RTRAPS+2 CLEAR FUTURE PRIORITY AND CC 
1042 012452 005737 000001 eee ; TRAP HERE. 
1043 012456 1$: STEST FOR ‘'C'’ CLEARED 
1044 012456 100005 BPL so 
012460 012737 000221 000302 MOV #221, $FATAL —-;MOVE TO MAILBOX # sxeeeee 221 seeenee 
012466 00521 INC. (Rd SET MSGTYP TO FATAL ERROR 
012470 HALT :C NOT CLEARED 
TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 760 
1045 012472 2s: 
012472 001005 BNE 3$ 
012474 012737 000222 000302 MOV «#222, $FATAL —«- MOVE _TO MAILBOX # saeeexx 222 tenenee 
012502 005212 INC —(R2) :SET MSGTYP TO FATAL ERROR 
2504 000000 HALT :Z NOT CLEARED 
TO SCOPE REPLACE HALT WITH 240 
AND REPLACE NEXT INST WITH 752 
1046 012506 38: 
012506 102005 eve «4S 
012510 612737 000223 0c0302 MOV #223, $FATAL = ;MOVE_TO MAILBOX # seeeeee 223 teeenes 
012516 005212 INC (R2? :SET MSGTYP TO FATAL ERROR 
012520 HALT :V NOT CLEARED 
TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 744 
1047 012522 4$: 
012522 103005 ee: @ 
012524 012737 000224 000302 MOV  #224,$FATAL —-;MOVE TO MAILBOX # sseeaee 224 senenee 
012532 005212 INC (R2) [SET MSGTYP TO FATAL ERROR 
2534 000000 HALT :C NOT CLEARED 
10 SCOPE REPLACE HALT WITH 240 
| AND REPLACE NEXT INST WITH 736 
1048 012536 032737 000357 177776 5$: BIT  —-#357,CC :TEST PRIORITY FOR ZERO 
1049 012544 001405 BEQ 
012546 012737 000225 000302 MOV #225, $FATAL ——-;MOVE TO MAILBOX # *exexxe 225 sanenee 
012554 005212 INC. (R2) SET MSGTYP TO FATAL ERROR 
012556 HALT PRIORITY NOT ZERO 
TO SCOPE REPLACE HALT WITH 240 
! ZAND REPLACE NEXT INST WITH 725 
1050 012560 012706 000500 6$: MOV -—s BUFF, SP 
1051 012564 012737 012604 000004 MOV —«-#7$,,RTRAPS 
1052 012572 012737 000357 000006 MOV - #357,RTRAPS+2 =; SET NEW ‘'CC’* AND PRIORITY 








1053 012600 
1054 012604 
012604 
012606 
012614 
012616 
1055 Hes 
012620 
012622 
012630 
012632 


1056 012634 
012634 


1057 012650 
012650 
012652 
012660 
012662 

1058 012664 


1059 012670 
1060 pigeons 





AR I em my 





a | 11/44 eat 
TEST #56 = TEST 


005737 


100405 
012737 
005212 
000000 


102405 
012737 
00531 2 
000000 


MACRO M1113 fa 12:47 PAGE 67-1 
"NEW'’ STATUS IS CORRECT 


000001 
7$: 


000226 000302 


8$: 


000227 000302 


9$: 


000230 000302 


10$: 


000231 000302 


177776 11$: 


000357 


000232 000302 


TST 


1 


8$ 
#226, $F ATAL 
(R2) 

9$ 

#227, $FATAL 
(R2) 

10$ 

#230,$F ATAL 
(R2) 

11$ 

#231, $FATAL 
(R2) 


CC,RO 
#357,RO 
TST57 
#232, $F ATAL 
(R2) 


; TRACE HERE 


sMOVE TO MAILBOX # *#eexe® 226 
SET MSGTYP TO FATAL ERROR 


7N NOT SET 

TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 705 
MOVE TO MAILBOX # **#exee® 227 
;SET MSGTYP TO FATAL ERROR 
3Z_NOT SET 

TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 677 
MOVE TO MAILBOX # *xeeee® 230 
oor ser TO FATAL ERROR 

TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 671 
MOVE TO MAILBOX # **exxee = 231 
SET MSGTYP TO FATAL ERROR 


3C NOT SET 
[TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 663 


MOVE TO MAILBOX # *kxxxee 232 
;SET MSGTYP TO FATAL ERROR 


RHERRKE 


RHKKKKE 


KEKKKKE 


KREKKEKE 


REKKKEE 


SPRIORITY WAS CHANGED,OR WRONG $TSTNM 


;TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 651 


SEQUENCE 80 





1061 


012710 


1072 013044 


CKKABCO_11/44 TRAPS 


032737 
0 


012737 
005212 
000000 


005037 


MACRO M1113 23=APR=81 12:47 a 68 
TEST #57 = TEST THAT DEC R6 TO A VALUE LESS 400 TRAP 


177766 


000502 


000302 


D7 


SEQUENCE 81 


.SBTTL TEST #57 = TEST THAT DEC R6 TO A VALUE LESS 400 TRAPS 


RARARRRAR RRA ARRAAEEAEE RARER RARE RAR ERE ERER ERA RERERARER ERE ARERR ERAS 


[TEST 57 = TEST THAT DEC R6 TO A VALUE LESS 400 TRAPS 


POPC TeTTTTTOT TTT TITTLE LITLE LLL LLL LLL ddidddbdbddd ddd ldedeidedel 


S157: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
BEQ 100$ ‘BRANCH AROUND CLEAR AND HALT IF CLEAR 
MOV #177,$F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
INC (R2) ‘SET MSGTYP TO FATAL ERROR 
HALT ‘CPU POWER BIT FOUND SFT 
BIC #1, CPUERR ‘CLEAR THE BIT FOUND SET 
100$: INC $TESTN [UPDATE TEST NUMBER 
CMP #57,$TESTN * SEQUENCE ERROR? 
BNE 2$ “BRANCH TO ERROR HALT ON SEQ ERROR 
CLR CPUERR :CLEAR CPU ERROR REGISTER 
MOV #150,R6 tR6 = 150 
MOV #1$,4 i STACK OVERFLOW TRAP POINTER 
TST -(R6) R6 = 150 SHOULD TRAP 
MOV #233, SFATAL ‘move TO MAILBOX ye 233 eeeeeee 
INC (R2) SET MSGT YP TO FATAL ERROR 
HALT ‘SHOULD HAVE TRAPPED,OR WRONG $TSTNM 
:TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 762 
MOV CPUERR.RCPUER ; SAVE CPU ERROR REGISTER 
BIC #CERMSK,RCPUER MASK OFF UNUSED CPU ERROR REG BITS 
CMP #4, RCPUER ‘IS YELLOW ZONE BIT SET? 
is BEQ 3$ 
MOV #234, $F ATAL :MOVE TO MAILBOX # *xeeeex 234 eeeenee 
INC (R2) ‘SET MSGTYP TO FATAL ERROR 
HALT “INCORRECT CPU ERROR REGISTER CONTENTS, OR WRONG $TSTNM 
‘TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 743 
3$: CLR CPUERR “CLEAR YELLOW ZONE BIT 





CKKABCO 11/44 TRAPS 
TEST #60 = TEST FOR DEC OF R6 ON OVERFLOW TRAP 


1073 


177766 
000302 


013050 032737 
013056 001410 


000304 


1074 013114 2706 000150 
013130 


000142 
000235 


000004 


000302 


177766 


MACRO M1113 23-APR-81 12:47 PAGE 69 


SEQUENCE 


.SBTTL TEST #60 = TEST FOR DEC OF R6 ON OVERFLOW TRAP 


[RARER RERAR ARR R RARE REAR AAA ARATE A AERA AREER AERA EES CREE ETERS 


[TEST 60 = TEST FOR DEC OF R6 ON OVERFLOW TRAP 


Peer POerTT TTT TTT TIT TITTLE LLL LLL hid tld illdebebebedehebehehal 


TST60: 


1$: 


BIT 


#1 ,CPUERR 
100$ 

#177, SFATAL 
(R2) 

#1, CPUERR 
STESTN 

#60, $TESTN 
TST61-12 


TS 
#235, $FATAL 
(R2) 


:SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
(CH AROUND CLEAR AND HALT IF CLEAR 
“MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 


S SEQUENCE ERROR? 
: BRANCH 


:R6 = 150 
: TRAP POINTER 
‘WITH R6 = 150 SHOULD TRAP 
‘DID R6 DECREMENT 


z;MOVE TO MAILBOX # *exxee" © 235 
#SET MSGTYP TO FATAL ERROR 

7R6 NOT = 142,0R WRONG $TSTNM 
[TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 761 


H TO ERROR HALT ON SEQ ERROR 


RERRKKE 


—— 


CKKABCO 11/44 TRAPS 
TEST #61 = TEST DIFFERENT TYPES OF OVERFLOW 


-SBTTL TEST #61 = TEST DIFFERENT TYPES OF OVERFLOW 


LRRRARAR AERA AE ERA RARER AERA ERE AAE ERA RE RAR AR EERE EER AREER E ES 


[TEST 61 = TEST DIFFERENT TYPES OF OVERFLOW 


Peer rerrrTTTTT TTT TTT TTT TTT TTT TTI TTL ITTT Litt ee 


1079 


leleleleleleleleleleia) 

— 8 Ss SS Gs Ss Ss YH) YH YS 

x Reeeegsssses 
bah Nw w 

¥ ROR NSSSES 


013332 


1095 013334 
1105 


032737 
0 


012705 
012706 
Wiscee 
124645 

ate ta 
005712 


i) 


012706 
Ole eof 
13454 


012757 
005212 


000400 
013334 


000240 


000302 


000302 


000004 


000302 


TST61: 


1$: 


2$: 


3$: 


4$: 


5$: 


BIT 


MACRO M1113 23-APR=81 12:47 PAGE 70 


4 , CPUERR 

#177, $FATAL 

(R2) 

#1, CPUERR 

STESTN 

#61,$TESTN 
12 


2 
#236,$F ATAL 
(R2) 


#1000 ,R5 
#400,R6 


#3$,4 

-(R6) ,~(R5) 
#237,$FATAL 
(R2) 


#400,R6 

4 

-(R5) ,-(R6) 
#240, $F ATAL 
(R2) 


SEQUENCE 


3SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
SBRANCH AROUND CLEAR AND HALT IF CLEAR 
[MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
SET MSGTYP TO FATAL ERROR 
:CPU POWER BIT FOUND SET 
[CLEAR THE BIT FOUND SET 
[UPDATE TEST NUMBER 
; SEQUENCE ERROR? 
;BRANCH TO ERROR HALT ON SEQ ERROR 


zSTATUS WORD OF LOC 10 
RETURN TO LOC 4 


RKKEKKEKE 


s;MOVE TO MAILBOX # *xeeKe® 
:SET MSGTYP TO FATAL ERROR 

; INCREMENT OPERATION NOT INHIBITED 
:TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 757 


RREKKEE 


:MOVE TO MAILBOX # *#eexxe 237 
‘SET MSGTYP TO FATAL ERROR 

“STACK = 400 AND DE CREMENTED SHOULD TRAP 
‘TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 742 


MOVE TO MAILBOX # *eeeeee 240 taeenne 
7SET MSGTYP TO FATAL ERROR 


OR WRONG $TSTNM 


383 


rc 


CKKABCO 11/44 TRAPS 


1106 


012737 
005212 
000000 


012737 


MACRO M1113 23-APR=-81 12:47 PAGE 71 
TEST #62 = TEST THAT AN 10 CAUSES AN OVERFLOW TRAP 


.SBTTL TEST #62 = TEST THAT AN 10 CAUSES AN OVERFLOW TRAP 


PERRARAA AERA A REET AREER AREA EAAAAAEERAAERARAAERERAAERREAEREREAERAEA EES S 


STEST 62 = TEST THAT AN 10 CAUSES AN OVERFLOW TRAP 


000012 


000302 


000070 


S162: 


100$: 


23: 


BIT 


HALT 


4 —— 
#177, SF ATAL 
(R2) 

#1,CPUERR 
STESTN 

+ attaiati 
#400,R6 

#1$,10 ;SET UP 


#2$.4 


#241, $F ATAL 
(R2) 


#10+2,10 


SEQUENCE 


é PrrrrrrrrrrTrTrrTrTrTTTITTTTITITTTTILT ITT Lit LLL 


ome IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
H AROUND CLEAR AND HALT IF CLEAR 
MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
Ser MSGTYP TO FATAL ERROR 
CPU POWER BIT FOUND SET 
[CLEAR THE BIT FOUND SET 
[UPDATE TEST NUMBER 
SEQUENCE ERROR? 
BRANCH TO ERROR HALT ON SEQ ERROR 
{SET UP UP * as TO OVERFLOW 
7 SET uP OOVERF LOW VECTOR 
THIS TRAP SHOULD CAUSE OVERFLOW 


sMOVE TO MAILBOX # xeeneee 24] xeaenee 

:SET MSGTYP TO FATAL ERROR 

TRAP FLAG OVERFLOW DID NOT OCCUR,OR WRONG $TSTNM 
:T0 SCOPE REPLACE HALT WITH 240 

+ AND REPLACE NEXT INST WITH 761 


H ? 
Spry 11/44 TRAPS MACRO M1113 23-APR=81 12:47 PAGE 72 SEQUENCE 
| Te #63 - TEST THAT AN JOT CAUSES AN OVERFLOW TRAP 
1107 _SBTTL TEST #63 = TEST THAT AN IOT CAUSES AN OVERFLOW TRAP 
| RRA AAAEEAAAA AREA AAAAEEAA AAA AEAAAAARAAAAAEAAAAAARERARRARAARRARA EERE HERES 
:TEST 63 = TEST THAT AN IOT CAUSES AN OVERFLOW TRAP 
PPPerrerrrTrrerTT eT TTT TICTITTT TITTLE LL LLL 
013442 032737 000001 177766 TS163: BIT #1,CPUERR ;SEE IF BIT O OF CPUERR (POWER MONITOR BIT) IS SET 
013450 001410 BEQ 100$ ‘BRANCH AROUND CLEAR AND HALT IF CLEAR 
013452 012737 000177 000302 MOV #177, $F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
013460 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
013462 000000 HALT :CPU POWER BIT FOUND SFT 
013464 042737 000001 177766 BIC "1, CPUERR SCLEAR THE BIT FOUND SET 
013472 005237 000304 100$: INC $TESTN [UPDATE TEST NUMBER 
913476 022737 000063 000304 CMP #65, STESTN s SEQUENCE ERROR? 
013504 001011 BNE ies BRANCH TO ERROR HALT ON SEQ ERROR 
013506 012706 000400 MOV SET UP STACK TO OVERFLOW 
013512 012737 013530 000020 MOV rs 30" :SET UP JOT VECTOR 
013520 012737 013542 000004 MOV #2$.4 iSeT UP OVERFLOW VECTOR 
Oi seSe 000004 13 10T THIS TRAP SHOULD CAUSE OVERFLOW 
013530 012737 000242 000302 MOV #242, $F ATAL SMOVE TO MAILBOX # *eeeeee 242 eeeeeee 
613536 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
013540 000000 HALT -7RAP FLAG OVERFLOW DID NOT OCCUR,OR WRONG STSTNM 
‘TO SCOPE REPLACE HALT WITH 240 


TAND REPLACE NEXT INST WITH 761 


013542 012737 000022 000020 2$: MOV #20+2,20 





I 
CKKABCO 11/44 TRAPS MACRO M1113 23-APR=-81 12:47 PAGE 73 SEQUENCE 
TEST #64 = TEST THAT AN EMT CAUSES AN OVERFLOW TRAP 


[ 
| 
| 1108 .SBTTL TEST #64 = TEST THAT AN EMT CAUSES AN OVERFLOW TRAP 
| 
! 


FARRAR A ERA A TERRA AAAATAA AAA AAAARAAERARRERAAARRAAAERAAAARARA HARTA ALARA ES 


STEST 64 = TEST THAT AN EMT CAUSES AN OVERFLOW TRAP 


PPPTrrerTTTTeTTTITTTITIIIITITI TT LLL LLL LLL LL 


013550 032737 000001 177766 TST64: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 

013556 001410 BEQ 100$ SBRANCH AROUND CLEAR AND HALT IF CLEAR 

013560 012737 000177 000302 MOV #177, $F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 
005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 

013570 HALT POWER BIT FOUND SFT 

013572 042737 000001 177766 BIC #1, CPUERR <CLEAR THE BIT FOUND SET 

013600 005237 000304 100$: INC STESTN [UPDATE TEST NUMBER 

0136046 022737 000064 000304 CMP #64, $TESTN s SEQUENCE ERROR? 

013612 001011 BNE 1$ ZBRANCH TO ERROR HALT ON SEQ ERROR 

013614 012706 000400 MOV #400,R6 SET UP STACK TO OVERFLOW 

013620 012737 013636 000030 MOV #1$.80 :SET UP EMT VECTOR 

013626 012737 013650 000004 MOV #2$.4 sSET UP OVERFLOW VECTOR 

013634 104000 a EMT ‘THIS TRAP SHOULD CAUSE OVERFLOW 

013636 012737 000263 000302 MOV #263, $F ATAL :MOVE TO MAILBOX # seeeeee 243 eneeeee 

0613644 005212 INC (R2) 2 SET MSGTYP TO FATAL ERROR 

013646 000000 HALT * TRAP FLAG OVERFLOW DID NOT OCCUR,OR WRONG STSTNM 


310 SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 761 


013650 012737 000032 000030 2$: MOV #30+2,30 








pm ee ee 
ee 


a “e . 
CKKABCO 11/44 TRAPS MACRO M1113 23-APR-81 12:47 PAGE 74 SEQUENCE 
| TEST #65 = TEST THAT AN TRAP CAUSES AN OVERFLOW TRAP 
| 409 _SBITL TEST #65 = TEST THAT AN TRAP CAUSES AN OVERFLOW TRAP 
| FRRAAAAAAAAAARAARAAAAAAAAAEAAAAAAAARAEAARRARAAAREAAAAREAAARAAAAT ERA AAAAEE SS 
STEST 65 = TEST THAT AN TRAP CAUSES AN OVERFLOW TRAP 
PrrerrerrrrrrrrrTrTeTrTTTTTTTITITITITI LT LLL LLL 
013656 032737 000001 177766 S165: BIT #1, CPUERR sSEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
013664 001410 BEO 100$ SBRANCH AROUND CLEAR AND HALT IF CLEAR 
013666 012737 000177 000302 MOV #177, $F ATAL [MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
013674 005212 INC (R2) SSET MSGTYP TO FATAL ERROR 
013676 HALT :CPU POWER FOUND SET 
013700 042737 000001 177766 BIC #1, CPUERR :CLEAR THE BIT FOUND SET 
013706 005237 000304 100$: INC STESTN [UPDATE TEST NUMBER 
013712 022737 000065 000304 CMP #65, STESIN i SEQUENCE ERROR? 
013720 001011 BNE 1$ ‘BRANCH TO ERROR HALT ON SEQ ERROR 
013722 012706 000400 MOV #400,R6 *SET UP STACK TO OVERFLOW 
013726 012737 013744 000034 MOV #1$,34 ;SET UP TRAP VECTOR 
013734 012737 013756 000004 MOV #2$.4 :SET UP OVERFLOW VECTOR 
91 3742 104400 Ke TRAP STHIS TRAP SHOULD CAUSE OVERFLOW 
013744 012737 000244 000302 MOV #244, $F ATAL :MOVE TO MAILBOX # seeene 244 seenene 
613752 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
013754 000000 HALT “TRAP FLAG OVERFLOW DID NOT OCCUR,OR WRONG $TSTNM 
[TO SCOPE REPLACE HALT WITH 240 


SAND REPLACE NEXT INST WITH 761 


013756 012737 000036 000034 2$: MOV #3442 ,34 





CKKABCO 11/44 TRAPS 
TEST #66 = TEST THAT AN TRT CAUSES AN OVERFLOW TRAP 


1110 


013764 032737 


014052 012737 
01 005212 
000000 


014064 012737 





a nr —_—— 


7 


MACRO M1113 23-APR=81 12:47 PAGE 75 


000001 
000177 


000001 
000304 
000066 
000400 
014052 
014064 


000245 


000016 


177766 
000302 


177766 
000304 


000014 
000004 


000302 


000014 


SEQUENCE 


.SBTTL TEST #66 = TEST THAT AN TRT CAUSES AN OVERFLOW TRAP 


RRA AREER A TERRA AREA RAEAAEA AR AAR AAA EAE E RAE A REREAD 


‘TEST 66 = TEST THAT AN TRT CAUSES AN OVERFLOW TRAP 


PrerrrrrrrTrrTreT TTT TT TTI TIT TTT tte eee 8D DD 


TST66: 


100$: 


2$: 


#1, CPUERR 
100$ 
#177, $F ATAL 
(R2) 


#1, - 
$TESIN 

#66, S$TESTN 
1$ 


#400 ,R6 
#1$,14 ;SET UP 


#245, $F ATAL 
(R2) 


#144+2,14 


i SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
AANCH AROUND CLEAR AND HALT IF CLEAR 

?MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 

SET MSGTYP TO FATAL ERROR 

CPU POWER BIT FOUND SET 

;CLEAR THE BIT FOUND SET 

[UPDATE TEST NUMBER 

; SEQUENCE ERROR? 

BRANCH TO ERROR HALT ON SEQ ERROR 

SET UP STACK TO OVERFLOW 

TRT VECTOR 

;SET UP OVERFLOW VECTOR 

THIS TRAP SHOULD CAUSE OVERFLOW 


MOVE TO MAILBOX # *eKeee 245 xeeKKee 
2 SET MSGTYP TO FATAL ERROR 
: TRAP FLAG OVERFLOW DID NOT OCCUR,OR WRONG STSTNM 
:TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 761 









CKKABCO_11/44 TRAPS 


TEST #67 = TEST THAT AN ILLA CAUSES AN OVERFLOW T 


1111 


014170 


014172 


014216 


032737 
0 


012737 
005212 
000000 


012737 
020627 


MACRO M1113 23~APR-81 ig Sed 47 PAGE 76 


000400 
014160 
014172 


000246 


000012 
000370 


000247 


177766 
000302 


177766 
000304 


000010 
000004 


000302 


000010 


000302 


SEQUENCE 


.SBTTL TEST #67 = TEST THAT AN ILLA CAUSES AN OVERFLOW TRAP 


RRR EERE REE ERA EERE ERE EERE EERE R ERR ER EERE 


:TEST 67 = TEST THAT AN ILLA CAUSES AN OVERFLOW TRAP 


ee HI TIRE EERE RARER REREEEREREEEKEEREEREEREREAEEEEEEEREH 


1ST67: 


100$: 


1$: 


2$: 


BIT 


#1, CPUERR 
100$ 

#177, $FATAL 
(R2) 
#1,CPUERR 
$TESTN 

i ree 


#400,R6 
#1$,10 ;SET UP 
#234 


#246, $F ATAL 
(R2) 


#10+2,10 
RG. #370 


ST70 
#367, SFATAL 
(R2) 


:SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
(CH AROUND CLEAR AND HALT IF CLEAR 

“MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 

SET MSGTYP TO FATAL ERROR 

[CPU POWER BIT FOUND SET 

[CLEAR THE BIT FOUND SET 

[UPDATE TEST NUMBER 

;SEQUENCE ERROR 

BRANCH TO ERROR HALT ON SEQ ERROR 

;SET UP STACK TO OVERFLOW 


ILLA VECTOR 


;SET UP OVERFLOW VECTOR 
THIS TRAP SHOULD CAUSE OVERFLOW 


;MOVE TO MAILBOX # xeeeeee 246 seeenee 
SET MSGTYP TO FATAL ERROR 

;TRAP FLAG OVERFLOW DID NOT OCCUR.OR WRONG STSTNM 
TO SCOPE REPLACE HALT WITH 240 

SAND REPLACE NEXT INST WITH 761 


STACK PUSHED FOUR WORDS? 


;MOVE TO MAILBOX # *xexxee 247 xeeeeee 
[SET MSGTYP TO FATAL ERROR 

[CORRECT # (4) OF WORDS WERE NOT PUSHED ONTO STACK 
[TO SCOPE REPLACE HALT WITH 240 

SAND REPLACE NEXT INST WITH 746 


89 





CKKABCO 11/44 TRAPS 


TEST #70 = TEST THAT AN 


1114 





01 
014314 
014316 


014320 





032737 
0 


012737 
005212 
000000 


012737 


MACRO M1113 23-APR-81 ig to 47 PAGE 77 SEQUENCE 


ILLB CAUSES AN OVERFLOW T 


00 
014306 
014320 


000250 





177766 
000302 


177766 
000304 


000010 
000004 


000302 


000010 


.SBTTL TEST #70 = TEST THAT AN ILLB CAUSES AN OVERFLOW TRAP 


ERR RRR E EERE ARERR REE A AER AER RARER ER RAR REAR RE ERE REE 


:TEST 70 = TEST THAT AN ILLB CAUSES AN OVERFLOW TRAP 


PPPTeTTeT TTT eT TTT TT ITT TTT TT TTT ELLE LL LLL LL LLL! 


TST70: 


100$: 


1$: 


2$: 


#1, CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
100$ (CH AROUND CLEAR AND HALT IF CLEAR 
#177, $F ATAL = MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
(R2) ‘SET MSGTYP TO FATAL ERROR 
‘CPU POWER BIT FOUND SET 
#1, CPUERR *CLEAR THE BIT FOUND SET 
$TESIN [UPDATE TEST NUMBER 
#70,$TESIN s SEQUENC.. ERROR? 


;BRANCH TO ERROR HALT ON SEQ ERROR 
#400,R6 SET UP STACK TO OVERFLOW 
#1$,10 ;SET UP ILLB VECTOR 


VEC 
#2$,4 SET UP OVERFLOW VECTOR 
THIS TRAP SHOULD CAUSE OVERFLOW 
#250, $F ATAL MOVE TO MAILBOX weeeeee 250 seeeene 
(R2) sSET MSGTYP TO FATAL ERROR 


; TRAP FLAG OVERFLOW DID NOT OCCUR,OR WRONG $TSTNM 
[TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 761 

#10+2,10 


1116 


014326 
01 


14420 


VUVEORUNVSSa~ 
CONAULRWN—OOOnN 


0 
0 
0 
0 
0 
014414 
0 
0 
0 
0 
0 
0 


36 
014440 


CKKABCO 11/44 TRAPS 
TEST #71 = TEST FOR FALSE OVERFLOW TRAP 


032737 


012737 
005212 
000000 


012737 
005037 


MACRO M1113 _23-APR=81 12:47 PAGE 78 


000001 
000177 
000001 


000304 
000071 


014440 
001002 
002002 
004002 
010002 
020000 


000251 


000006 
000006 





177766 
000302 


177766 
000304 


000004 


000302 


000004 


SEQUENCE 


.SBITL TEST #71 = TEST FOR FALSE OVERFLOW TRAP 


RRRARRAAR REAR REE AAA AERA AERA AREA AERA ERARRRARRRERR AREA AEA AERA E ERED 


[TEST 71 = TEST FOR FALSE OVERFLOW TRAP 


POC TTT TTT TTT TTT TITTLE LLL LLL LLL 


TST71: 


1$: 


2$: 


+ CPUERR 
#177,$FATAL 
(R2) 
#1, CPUERR 
STESTN 
#71, $TESTN 
1$ 
#1$,4 
#1002,R6 
-(R6) 
<}*1y R6 
45002, R6 
(R6) 


w10002, 2R6 
#20000 ,R6 
~(R6) 


#251, $F ATAL 
(R2) 


#6,4 
6 


;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
ZBRANCH AROUND CLEAR AND HALT IF CLEAR 

[MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 

;SET MSGTYP TO FATAL ERROR 

3;CPU POWER BIT FOUND SET 

7CLEAR THE BIT FOUND SET 

[UPDATE TEST NUMBER 

; SEQUENCE ERROR? 

BRANCH TO ERROR HALT ON SEO ERROR 


;SET UP OVERFLOW POINTER 
; SHOULD NOT OVERFLOW 
;SHOULD NOT OVERFLOW 
; SHOULD NOT OVERFLOW 


;SHOULD NOT OVERFLOW 


RRKKKKEK 


MOVE TO MAILBOX # **eeee® = 251 
;SET MSGTYP TO FATAL ERROR 

TSTACK OVERFLOWED,OR WRONG $TSTNM 
TO SCOPE REPLACE HALT WITH 240 
[AND REPLACE NEXT INST WITH 747 


91 





1132 


aQooo00o 
aod ad aad a ad 
& 
wi 
Po 
Oo 


= 
* 
Ww 
yv) 
oO 


1140 014570 


CKKABCO 11/44 TRAPS 
TEST #72 = TEST THAT BIT 4 


032737 
001410 





x M1113 23-APR=81 12: SP as 79 


PSW WILL CAUSE A TRAP T 


000001 
000177 
000001 


000304 
000072 


000500 
014570 
000020 
014554 


000252 


177766 
000302 


177766 
000304 


000014 


000302 


SEQUENCE 92 


.SBTTL TEST #72 = TEST THAT BIT 4 PSW WILL CAUSE A TRAP TO 14 


RRR ERE AERA ERE REA EERE E EERE AR REAR AAR RAR AREER ARERR EEE 


:TEST 72 = TEST THAT BIT 4 PSW WILL CAUSE A TRAP TO 14 


PPC TTTTTTTITTTITI TITTLE LLL LLL i ibd hhh 


S172: 


100$: 


#1, CPUERR 
100$ 
#177, $F ATAL 
(R2) 

4F aaa 


We, STESTN 
Ist 73-12 


ae 
#38, RiRAPS 


0,-(SP) 
#1$,-(SP) 


#252, $F ATAL 
(R2) 


SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
[BRANCH AROUND CLEAR AND HALT IF CLEAR 

[MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 

:SET MSGTYP TO FATAL ERROR 

;CPU POWER FOUND SET 


+ SEQUENCE ERROR? 
;BRANCH TO ERROR HALT ON SEQ ERROR 


SET UP TO TRAP TO 14 
SH T BIT 


RRERKKEK 


RE 
“MOVE TO MAILBOX weaeeee 252 
SET MSGTYP TO FATAL ERROR 
TRACE BIT DID NOT TRAP! ,OR WRONG $TESTN 
[TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 757 





1141 


014570 
014576 
014600 


ah end ead aad oa nll wl 
aad aad anh and anh at call 
Par ar et et ee 
CONAUISWI 


0) 
014670 
014672 


014712 


CKKABCO_11/44 TRAPS 
TEST #73 = TEST STACK POINTER DECREMENTS 


032737 





C 
MACRO M1113 a 12:47 PAGE 80 SEQUENCE 93 


000474 
000254 


177766 
000302 


177766 
000304 
000014 


000302 


000302 


-SBTTL TEST #73 = TEST STACK POINTER DECREMENTS 


RRR RRERER EAE ERE RE RERERREARERER EERE RRER EERE RARER EERE EERE AER 


STEST 73 = TEST STACK POINTER DECREMENTS 


TEESE ISOS ISIS IIIS III TR REET EE EERE EE Eee tt Ht ee 


1ST73: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
BEQ 100$ *BRANCH AROUND CLEAR AND HALT IF CLEAR 
MOV #177, $FATAL ‘MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
INC (R2) :SET MSGTYP TO FATAL ERROR 
HALT *CPU POWER BIT FOUND SFT 
BIC . zGPUERR SCLEAR THE BIT FOUND SET 
100$: INC ‘UPDATE TEST NUMBER 
CMP W, STESTN * SEQUENCE ERROR? 
BNE IST? orig ;BRANCH TO ERROR HALT ON SEQ ERROR 
MOV w3S RIRAPS 
MOV #20.=(SP) :PUSH T BIT 
MOV #1$,-(SP) ‘PUSH PC 
RTI ‘SET T BIT 
1$: NOP STRAP HERE 
MOV #253, $FATAL “MOVE TO MAILBOX # *xxexee 253 xexeene 
INC (R2) ‘SET MSGTYP TO FATAL ERROR 
HALT ‘TRACE BIT DID NOT TRAP! 
‘TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 757 
2$: CMP SP, ABUFF =4 
BEQ TST74 
MOV #254, $F ATAL :MOVE TO MAILBOX # *txexee 254 seeneee 
INC (R2) “SET MSGTYP TO FATAL ERROR 
HALT “STACK POINTER WAS NOT PUSHED BY TRAP,OR WRONG $TESTN 


3TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 747 





MACRO M1113 ee 12:47 PAGE 81 SEQUENCE 


CKKABCO 11/44 TRAPS 
TEST #74 = TEST FOR PROPER PC ON STACK 


1151 _SBITL TEST #74 = TEST FOR PROPER PC ON STACK 
RRR REAR REE EERE REAR ER ERE ERA RERERE REAR REAR RARER AEE 
‘TEST 74 = TEST FOR PROPER PC ON STACK 
Peer errerrerrTTTeTrTT Te TTT TTT TIT TT TTI TTT Titi titi iii iii tities) 
014714 032737 000001 177766 TST74: BIT #1, CPUERR SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
014722 001410 BEQ 100$ ‘BRANCH AROUND CLEAR AND HALT IF CLEAR 
614724 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
014732 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
4734 HALT :CPU POWER BIT FOUND SFT 
14736 042737 000001 177766 BIC #1, CPUERR SCLEAR THE BIT FOUND SET 
014744 005237 000304 100$: INC $TE [UPDATE TEST NUMBER 
014750 022737 000074 000304 CMP a. STESTN s SEQUENCE ERROR? 
014756 001016 BNE TST?5=1 sBRANCH TO ERROR HALT ON SEQ ERROR 
1152 014760 0127 500 MOV #BUF F ss i 
1153 014764 012737 015026 000014 MOV #2$,RTRAPS | 
1154 014772 012746 20 MOV #20,-(SP) | :PUSH T BIT 
1155 014776 012746 015004 MOV #1$.-(SP) ‘PUSH Ps 
1156 015002 RTI tSET T BIT 
1157 015004 022737 015004 000474 1$: CMP wis BUF F=4, “TRAP HERE - SEE IF PC IS CORRECT 
1158 615012 001405 BEQ 75 
015014 012737 000255 000302 MOV #355, SFATAL sMOVE TO MAILBOX # *keeexe 255 sxenene 
015022 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
015024 HALT “CORRECT PC WAS NOT SAVED ON STACK,OR WRONG $TESTN 
‘TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 754 
1159 015026 2$: 








CKKABCO 11/44 TRAPS 
TEST #75 = TEST THAT RTT POPS T- B 


1160 


012060 


ee ceed ed ed aed ed od 

| 
AaO ov 

SIFALAVGS 
folelelelelejel ele a) 
mee ee ed ed od od od od 
MNAUIVIVIVIVIVIL IVI 
— 3 I CE) 
“N 
o 


EYRNVSSSRS 


1169 015136 


032737 
001410 





E 
MACRO oy pore 12:47 PAGE 82 SEQUENCE 


000256 


177766 
000302 


177766 
000304 


000014 


000302 


-SBTTL TEST #75 = TEST THAT RTT POPS T= BIT 


RARER ERE RARER ERE RARER AAA RARER EERE RERERR REAR ARERR EERE ES 


[TEST 75 = TEST THAT RTT POPS T= BIT 


PrrererrrrTrTrTTT TTT TTT ITIL TTT TTI LLL iii Lit 


TS175: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
BEQ 100$ ‘BRANCH AROUND CLEAR AND HALT IF CLEAR 
MOV #177,$FATAL ‘MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
INC (R2) ‘SET MSGTYP TO FATAL ERROR 
HALT ‘CPU POWER BIT FOUND SFT 
BIC #1, CPUERR ‘CLEAR THE BIT FOUND SET 
100$: INC $TEST [UPDATE TEST NUMBER 
CMP #75 STESTA * SEQUENCE ERROR? 
BNE TST76=1 ;BRANCH TO ERROR HALT ON SEQ ERROR 
MOV #BUFF , is 
CLR R1 :CLEAR 1 
MOV #20,-(SP) 
MOV #1$,-(SP) 
MOV #2$,14 
RTT 
1$ NOP 
BEQ TST76 
MOV #256, $FATAL :MOVE TO MAILBOX # *aeeeee 256 teeenee 
INC (R2) ‘SET MSGTYP TO FATAL ERROR 
HALT ‘T-BIT DID NOT TRAP,OR WRONG $TESTN 


;TO SCOPE REPLACE HALT WITH 240 
2s TAND REPLACE NEXT INST WITH 755 


95 


CKKABCO 11/44 TRAPS 
TEST #76 = TEST THAT RTT ALLOWS ONE INST. BEFORE TRAP 


1170 


ONNNNNYANNNSN 
VS ISIARARAN= 
ooo lelelelelelelelelele) 
a — ss YY YI I YY 
w MAMMA MAUI IIT 
Ww SONAL Rw 
¥ EVSNESSLSERES 


ee ed ed ed ed 
ek a ed od td od 3 


015252 


82 015254 
83 


015274 


1186 015276 





MACRO M1113 23-APR=-81 12:47 PAGE 83 


177777 
000500 


000020 
015234 
015254 


000257 


000260 


177766 
000302 


177766 
000304 


000014 


000302 


000302 


#1, CPUERR 
100$ 

#177, $FATAL 
(R2) 

#1, CPUERR 
STESTN 

#76, $TESTN 


TST?7=12 
#177777 2RS 


R1 


1$ 
#260,$F ATAL 
(R2) 


SEQUENCE 


.SBTTL TEST #76 = TEST THAT RTT ALLOWS ONE INST. BEFORE TRAP 


RRR RRR RAERREEEEERREER EERE ERAREREREREREERAAAERERERAAEREEEE ENED 


:TEST 76 = TEST THAT RTT ALLOWS ONE INST. BEFORE TRAP 


RRR RRR REE E RR EEEEERREEREREREREERERREEEEERERREERERAEERERERAAEREARERED 


3SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
;BRANCH AROUND CLEAR AND HALT IF CLEAR 
sMOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 


CPU POWER BIT FOUND SET 
CLEAR THE BIT FOUND SET 
UPDATE TEST NUMBER 
SEQUENCE ERROR? 
;BRANCH TO ERROR HALT ON SEQ ERROR 


CLEAR RO 
SET T-BIT 


:DO0 THIS TEST NO MORE THAN 2 TIMES 
X & weaneee 257 seenene 


sMOVE TO MAILBO 
;SET MSGTYP TO FATAL ERROR 
; NOT TRAP 


- T 

3TO SCOPE REPLACE HALT WITH 240 
yAND REPLACE NEXT INST WITH 752 
SEE IF RTT ALLOWS 1 INST. 


3D0 THIS TEST NO MORE THAN TWO TIMES 


sMOVE TO MAILBOX # *#eteee 260 xetaeee 
:SET MSGTYP TO FATAL ERROR 

:RTT DID NOT ALLOW 1 INST.,OR WRONG STESTN 
:TO SCOPE REPLACE HALT WITH 240 

AND REPLACE NEXT INST WITH 741 


-———__--— 


CKKABCO 11/44 TRAPS 


TEST #77 = TEST THAT RTI DOES NOT ALLOW 1 INST. 


1187 
015276 032737 
015304 00141 
015306 012737 
015314 5212 
015316 
015320 042737 
015326 5237 
015332 022737 
015340 001023 

1188 015342 012706 

1189 015346 012746 

1190 015352 012746 

1191 015356 012737 

1192 015364 005001 

1193 015366 

1194 €15370 005201 

1195 015372 012737 
015400 005212 
015402 

1196 015404 005701 

1197 

1198 015406 001405 
015410 012737 
015416 005212 
015420 


MACRO M1113 23-APR-81 12:47 PAGE 84 


000001 
000177 


000001 
000304 
000077 
000500 


000020 
015370 
015404 


000261 


000262 


000302 


SEQUENCE 


.SBTITL TEST #77 = TEST THAT RTI DOES NOT ALLOW 7 INST. 


{RRA AAEEARAA AEE A ERA AERA ARAAAA ERA AR RRAARE RRA AERERARERAR AERA AREER 


:TEST 77 = TEST THAT RTI DOES NOT ALLOW 7 INST. 


PPrrrrrrTTrTeTTTT TTT TTTI TIT TTT TT TILL 


TS177: 


1$: 


23: 


BIT 


AF , CPUERR 
#177, SFATAL 
(R2) 


#1, — 
$TEST 


#77 STESIN 
TST100- 


R1 
#261, SFATAL 
(R2) 


R1 


TST100 
#262,$F ATAL 
(R2) 


SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
7BRANCH AROUND CLEAR AND HALT IF CLEAR 

SMOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 

#SET MSGTYP TO FATAL ERROR 


; SEQUENCE ERROR? 
BRANCH TO ERROR HALT ON SEQ ERROR 


SET T-BIT 

7RTI SHOULD NOT ALLOW THIS 

[MOVE TO MAILBOX # **eee" 261 
;SET MSGTYP TO FATAL ERROR 

T= BIT DID NOT CAUSE TRAP 

[TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 756 


RTI SHOULD NOT ALLOW 1 INST. BEFORE TRAP 


sMOVE TO MAILBOX # *%*eeee §=262 
;SET MSGTYP TO FATAL ERROR 

RTI DID ALLOW 1 INST. BEFORE TRAP,OR WRONG $STESTN 
;TO SCOPE REPLACE HALT WITH 240 

‘AND REPLACE NEXT INST WITH 747 


RENE 


RERREEE 


97 


H 8 
i 


CKKABCO 11/44 TRAPS MACRO M1113 ae ts igs of PAGE 85 SEQUENCE 
TEST #100 = DOES THE PROCESSOR TRAP WHEN R7 
1199 .SBTTL TEST #100 = DOES THE PROCESSOR TRAP WHEN R7 IS ODD? 
PeeAeeReeeAAKeeeeeeRATeLereAKeKeNeAeKeAAeeReeReeearaLaraReeaanaTeaeaeseees 
[TEST 100 = DOES THE PROCESSOR TRAP WHEN R7 IS ODD? 
PPrerrrerrrrerrrTITTTITTTTTTT TIT LiTL iLL LL 

015422 032737 000001 177766 1ST100: BIT #1, CPUERR 7 SEE 4 BIT O OF CPUERR (POWER MONITOR BIT) IS SET 
015430 001410 BEQ 100$ 3 H AROUND CLEAR AND HALT IF CLEAR 
015432 012737 000177 000302 MOV #177, SFATAL sMOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
015440 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
015442 HALT :CPU POWE T FOUND SFT 
15444 042737 000001 177766 BIC #1, CPUERR CLEAR THE BIT FOUND SET 
015452 005237 000304 100$: INC STESTN ZUPDATE TEST NUMBER 
015456 022737 000100 000304 CMP #100, STESTN 7SEQUENCE ERROR? 
015464 001402 BEQ 10008 BRANCH OVER — HALT ON SEQ ERROR JUMP IF OK 
O12e% 000137 015732 , JMP TST101-12 ; JUMP TO ERROR HALT ON SEQ ERROR 

1200 015472 012706 000500 MOV #BUFF ,R6 SET UP Hey POINTER 

1201 015476 012737 015522 000004 MOV #1$,4 :RETURN FROM TRAP 

1202 0155 012707 000001 MOV #1,R7 + sons ONE 

1203 015510 012737 000263 000302 MOV #263,$F ATAL MOVE T O MAILBOX # seteeee 265 seeeene 
615516 005212 INC (R2) 7 SET MscTYP TO FATAL ERROR 
015520 000000 HALT £000 es SHOUL vE T 


1204 015522 022737 000001 000474 1$: CMP #1 ,BUFF <4 
1205 015530 001405 BEQ 
015532 012737 000264 000302 MOV #264, SFATAL MOVE TO MAILBOX # seeeeee 264 seeeene 
015540 005212 : INC (R2) 7SET MSGTYP TO FATAL ERROR 
015542 000000 HALT [CORRECT PC WAS NOT SAVED ON STACK 
i. SCOPE REPLACE HALT WITH $38 
AND REPLACE NEXT INST WITH 7 
1206 015544 012706 000500 23: MOV BUFF RO STACK POINTER 
1207 015550 012737 015572 000004 MOV #4$,4 
1208 015556 005207 INC R7 :PC BECOMES ODD 
1209 015560 3$: 
015560 012737 000265 000302 MOV #265, SFATAL MOVE TO MAILBOX # se#eeene 265 seeeeee 
015566 005212 INC (R2) 3SET MSGTYP TO FATAL ERROR 
015570 000000 HALT 
[TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 737 
1210 015572 022737 015561 000474 4$: CMP #3$+1 ,BUFF-4 
1211 015600 001405 BEQ 
015602 012737 000266 000302 MOV #266, $F ATAL MOVE TO MAILBOX # seeeeee 266 eeeeeee 
015610 005212 INC (R2) [SET MSGTYP TO FATAL ERROR 
015612 000000 HALT CORRECT PC_NOT ON STACK 
TO SCOPE REPLACE HALT WITH es 
AND REPLACE NEXT INST WITH 
1212 015614 012706 000500 5$: MOV #BUFF .R6 
1213 015620 0127 37 015642 000004 MOV #7$,4 
1214 015626 005 6$: DEC R7 zMAKE PC ODD 
1215 015630 01 3757 000267 000302 MOV #267, SFATAL SMOVE TO MAILBOX # *#ee202 267 eeeeeee 
015636 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
015640 000000 HALT D TRAP 
[TO SCOPE REPLACE HALT WITH $49 
SAND REPLACE NEXT INST WITH 713 
1316 015642 Oee as 015627 000474 /7$: CMP #6$+1 BUFF =4 CHECK VALUE OF PC ON STACK 


0014 
015652 012737 000270 000302 MOV #270, $F ATAL MOVE TO MAILBOX # eeee2er 270 eeneere 


re 


CKKABCO 11/46 TRAPS MACRO M1113 23-APR-81 12:47 PAGE 85-1 
TEST #100 = DOES THE PROCESSOR TRAP WHEN R7 IS ODD? 


| 
| 015660 005212 INC (2? 
| 


015662 000000 HALT 
1218 015664 012706 000500 8$: MOV #BUFF RO 
1219 015670 012737 015714 000004 MOV #10$,4 
1220 015676 000261 SEC 
1221 015700 006107 ROL R7 
1222 015702 9$: 
015702 012737 000271 000302 MOV #271 ,SFATAL 
015710 005212 INC (R2) 
015712 000000 HALT 


were ~SFATAL 





SEQUENCE 


fet MSGT YP A FATAL ERROR 


ONG VALUE ON STACK 
3TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST wiTH 


;CARRY EQUALS A 1 
PC BECOMES ODD 


sMOVE TO MAILBOX # seeeeeee 271 eencene 
7SET MSGTYP TO FATAL Ba 
2000 ADDRESS DIDN'T 
SCOPE REPLACE HALT ann 240 
yy —s INST WITH 666 
HALT FOR TRAP 


aS RESET uP A 
a<c-98e1>, BUFF =4° ;CHECK FOR VALUE ON STACK 


ts TO MAILBOX # seeeeee 272 eeeneee 


C 
*TOo SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 652 


99 


KKABCO 11/446 TRAPS MACRO 1113 23-APR=81 12:47 a 86 SEQUENCE 100 


C 
TEST #101 = TEST THAT TRACE BIT TRAPS INHIB ON TRAP INS 
1226 .SBTTL TEST #101 = TEST THAT TRACE BIT TRAPS INHIB ON TRAP INST 


fp Peeeeaeeeeeerseearenetereeeeneeeeeeereeaeerereaaeeseneseeeeeaeaesseseaeees 


[TEST 101 = TEST THAT TRACE BIT TRAPS INHIB ON TRAP INST 


015744 032737 000001 177766 #$1101: BIT #1, CPUERR 7SEE IF BIT O OF CPUERR — MONITOR BIT) IS S&T 
015752 001410 BEQ 1 [BRANCH AROUND CLEAR AND HALT IF CLEAR 
015754 012737 000177 000302 MOV #177 ,SFATAL sMOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
015762 005212 (R2) sSET MSGTYP 19 FATAL ERROR 
015764 ony HALT [CPU POWER BIT FOUND SFT 
015766 042737 000001 177766 Bic #1, CPUERR ;CLEAR THE BIT FOUND SET 
015774 005237 000304 100$: INC STESTN UPDATE TEST NUMBER 
016000 022737 000101 000304 CMP #101, STESIN ; SEQUENCE ERROR? 
016006 001027 BNE 3$ ;BRANCH TO ERROR HALT ON SEQ ERROR 
1227 016010 012706 000500 MOV ABUFF RE 
1228 016014 012737 016052 000014 MOV #1$.14 ; TRACE TRAP 
1229 016022 005027 000016 CLR #16 
1230 016026 005027 000022 CLR #22 
1231 016032 012737 016100 000020 MOV #4$,20 :10T TRAP 
1232 016046 012746 000020 MOV #20,-(SP) ;PuSH T BIT 
1233 €16044 012746 016052 MOV #1$,-(SP) PUSH PC 
1234 016050 RTT 
1235 016052 000004 1$: 10T ; TRAP, NEW CC HAVE TRACE RESET 
1236 016054 2s: 
016054 012737 000273 000302 MOV #273,SF ATAL MOVE TO MAILBOX # s#eeeee 275 teeceee 
016062 005212 INC (R2) 7SET MSGTYP TO FATAL ERROR 
76064 000000 HALT ; TRACE TRAP WAS NOT INHIBITED 
:TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 750 
1237 016066 3$: 
016066 012737 000274 000302 MOV #274, $F ATAL MOVE TO MAILBOX # steeee2 274 seeeeee 
016074 005212 INC (R2) ;SET MSGTYP TO FATAL co 
016076 000000 HALT [WRONG TSTNM,OR WRONG $TS 
3:70 SCOPE REPLACE HALT wiTH M240 
SAND REPLACE NEXT INST WITH 743 
1238 016100 012737 000016 000014 4$: MOV #16,14 


1239 016106 012737 000022 000020 MOV #22,20 





kK 8 


po - 


CKKABCO 11/44 TRAPS MACRO M1113 23-APR=-81 12:47 PAGE 87 
TEST #102 = TEST THAT THE TRACE BIT IS SAVED IN THE STACK 


SEQUENCE 101 


1240 .SBTTL TEST #102 = TEST THAT THE TRACE BIT IS SAVED.»IN THE STACK 
SERRARRARERAARR AERA EERE EERE AR ARERR EERE TAREE AeA ee 
‘TEST 102 - TEST THAT THE TRACE BIT IS SAVED IN THE STACK 
POPeTTTOTTTITITITTTTITLTT ITLL LL LiL 
016114 032737 000001 177766 TST102: BIT #1, CPUERR SEE IF BIT O OF CPUERR (POWER MONITOR BIT) IS SET 
016122 001410 BEQ 100$ [BRANCH AROUND CLEAR AND HALT IF CLEAR 
016124 012737 000177 000302 MOV #177, $F ATAL ;MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
016132 5212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
16134 HALT :CPU POWER BIT FOUND SET 
016136 042737 1 177766 BIC #1,CPUERR [CLEAR THE BIT FOUND SET 
016144 005237 000304 100$: INC STESTN [UPDATE TEST NUMBER 
016150 022737 000102 000304 CMP #102, $TESTN ; SEQUENCE ERROR? 
016156 001020 BNE 2s ;BRANCH TO ERROR HALT ON SEQ ERROR 
1241 016160 012706 000500 MOV BUFF ,R6 + SET UP STACK POINTER 
1242 016164 012737 016232 000014 MOV #3$,14 ; TRACE TRAP RETURN 
1243 016172 005037 000016 CLR 16 
1244 016176 012746 000020 MOV #20,-(SP) ;SET THE T BIT 
1245 016202 012746 016210 MOV #1$,-(SP) 
1246 016206 RTI 
1247 €16210 033727 000476 000020 1$: BIT BUFF -2 ,420 ;CHECK FOR T BIT ON STACK 
1248 giesie 1 2$ BNE 3$ 
016220 012737 000275 000302 MOV #275, $FATAL MOVE TO MAILBOX # *#xexee 275) teeRKee 
016226 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
016230 000000 HALT 3;T BIT NOT SAVED ON THE STACK, OR WRONG $TSTNM 
[TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 752 
is 016232 012737 000016 000014 3$: MOV #16,14 
1251 
1252 THIS ROUTINE TEST THAT NO LEGAL ADDRESS TRAPS. 


tAND THAT AN ILLEGAL ADDRESS TRAPS TO LOCATION 4 





A a 


1254 


016240 


MNMrronorvr 


ee ee ee | 
MVNA 
Ze, 
W 


016362 


1269 

1270 016364 
1271 016370 
1272 016376 
1273 016404 


1275 

1276 016410 

1277 016412 

1278 016420 
016422 


016430 
016432 


1279 016434 
1280 016436 
1281 Lh reel 


CKKABCO 11/44 TRAPS 
TEST #103 = TEST NON-EXISTENT ADDRESS TRAPS 


032737 


101772 


012737 
005212 
000000 





L 
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000001 
000177 
000001 
000304 
000103 


016650 


177766 
000006 
016364 
000500 
160000 


000276 


016314 
160000 
000040 


000277 


000020 
000300 


177766 
000302 


177766 
000304 


000004 


000302 


000502 
000502 


000502 
000302 


000502 
000302 





-SBTTL TEST #103 = TEST NON-EXISTENT ADDRESS TRAPS 


{RRR AR EERE RRR RR EEE ER EERE REE EERE AREER EERE REE R ARERR RRR ARERR EE ES 


[TEST 103 = TEST NON-EXISTENT ADDRESS TRAPS 


PPT T TOTTI TTTTI TITTLE TEE LLL LLL LLL LLL ddd bid h iid idded 


TST103: BIT #1,CPUERR :SEE IF BIT O OF CPUERR (POWER MONITOR BIT) IS SET 
BEQ 100$ ‘BRANCH H AROUND CLEAR AND HALT IF CLEAR 
MOV #177, $F ATAL ‘MOVE S$ SPECIAL POWER MONITOR FATAL # TO SFATAL 
INC (R2) :SET MSGTYP TO FATAL ERROR 
HALT ;CPU POWER BIT FOUND SET 
BIC #1,CPUERR * CLEAR THE BIT FOUND SET 
100$: INC STESTN [UPDATE TEST NUMBER 
CMP #103, $TESTN ; SEQUENCE ERROR? 
BEQ 1000$ ‘BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
18$ ; JUMP TO ERROR HALT ON SEQ ERROR 
1000$: 
THIS set “Se ot MEMORY UNTIL IT DOES A NXM TRAP 
3$: 0 
4$: 0 
5$: CLR RO 
e ‘tar ;CLEAR CPU ERROR REGISTER 
MOV #834 ;SET UP ADDRESS TRAP ENTRANCE 
6$: MOV ABUFF ,SP 
TSTB (RO) + IF OUTSIDE OF CORE, TRAP TO 4 
CMP RO,4160006 :1S POINTER IN SIDE CORE 
-: BLOS 6$ ;TEST THE REST OF CORE 
MOV #276, $F ATAL sMOVE TO MAILBOX # **eeeee 276) KHKKKEE 
INC (R2) :SET MSGTYP TO FATAL ERROR 
HALT ; SHOULD HAVE TRAPPED 


3TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 751 


;RETURN HERE ON AN ADDRESS TRAP 
8$: MOV RO, MOVE THE FIRST NXM LOCAVION IN 5$ 
MOV CPUERR,RCPUER SAVE CPU ERROR REGISTER 


BIC ACERMSK,RCPUER ;MASK OFF UNUSED ERROR REG BITS 
CMP RO,4160000 ;WHICH CPU ERROR REG BIT SHOULD BE 
: SET - NON EXISTANT MEMORY (BIT 5) 
: OR UNIBUS TIMEOUT (BIT 4) 
BHIS 9$ ;BRANCH IF UNIBUS TIMEOUT BIT SHOULD BE SET 
ty 7 teat :1S NON-EXISTANT MEMORY BIT SET? 
MOV #277, $FATAL sMOVE TO MAILBOX # *%exeeee 277 xeKKKED 
INC (R2) :SET MSGTYP TO FATAL ERROR 
HALT + INCORRECT CPU ERROR REG CONTENTS 
:TO SCOPE REPLACE HALT WITH 240 
on 10$ + AND REPLACE NEXT INST WITH 725 
9$: ~~ ScD RCPUER 31S UNIBUS TIMEOUT BIT SET? 
MOV #300, $F ATAL MOVE TO MAILBOX # *eexeee 300 txeeeee 
INC (R2) :SET MSGTYP TO FATAL ERROR 
HALT * INCORRECT CPU ERROR REG CONTENTS 


7TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 713 






CKKABCO 11/44 TRAPS MACRO M1113 Poe 12:47 PAGE 88-1 SEQUENCE 103 


TEST #103 = TEST NON-EXISTENT ADDRESS T 


1282 THIS ROUT INE DOES NXM TRAPS UNTIL IT FINDS AN EXISTANT MEMORY LOCATION 
1283 016460 012700 10$: #160001 ,RO ;SET UP THE HIGHEST MEM LOCATION 
1284 016464 005037 177766 11$: CUR CPUER “CLEAR CPU ERROR REGISTER 
1285 016470 012737 016530 000004 MOV #14$,4 ‘SET UP THE VECTOR 
1286 016476 012706 000500 MOV #BUFF , SP 
1287 016502 105740 TSTB = = (RO) :DOES IT EXIST? 
1288 016504 005200 138: INC RO SIF YES INCREMENT IT 
1289 016506 020037 016314 CMP RO,4$ ‘1S IT THE SAME LOCATION? 
1290 016512 001463 BEQ 19$ 
016514 012737 000301 000302 MOV #301,$FATAL ;MOVE TO MAILBOX # saxexex 301 susnene 
016522 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
016524 HALT *CONTENTS OF RO SHOULD HAVE BEEN EQUAL 
‘TO SCOPE REPLACE HALT WITH 240 
AND REPLACE NEXT INST WITH 670 
1291 IF THIS COMPARISON FAILS IT MEANS 
1292 ‘THAT SOME LEGAL ADDRESS TRAPPED OR 
1293 “THAT AN ILLEGAL ADDRESS DID NOT TRAP 
1294 016526 000455 BR 19$ 
1296 €16530 005737 177776 14$: TST STATUS 
1297 016534 001405 BEQ 15$ 
016536 012737 000302 000302 MOV #302,$FATAL sMOVE TO MAILBOX # sexxxee 302 xexxene 
016544 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
016546 HALT ‘NEW PSW SHOULD HAVE BEEN ZERO 
‘TO SCOPE REPLACE HALT WITH 240 
ions SAND REPLACE NEXT INST WITH 657 
1299 016550 013737 177766 000502 15$: MOV CPUERR,RCPUER ;SAVE CPU ERROR REGISTER 
1300 016556 042737 177413 000502 BIC #CERMSK,RCPUER ;MASK OFF UNUSED ERROR REG BITS 
1301 016564 020027 160000 CMP #160000 :WHICH CPU ERROR REG BIT SHOULD BE 
1302 : T - NON EXISTANT MEMORY (BIT 5) 
1303 : OR UNIBUS TIOEOUT (BIT 4) 
1304 016570 103012 BHIS 16% ‘BRANCH IF UNIBUS TIMEOUT BIT SHOULD BE SET 
1305 016572 022737 000040 000502 CMP #40,RCPUER ‘1S NON-EXISTENT MEMORY BIT SET? 
1306 016600 001417 BEQ 17$ 
016602 012737 000303 000302 MOV #303, SFATAL sMOVE TO MAILBOX # *xexee 303 xenenne 
016610 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
016612 HALT ; INCORRECT CPU ERROR REG CONTENTS 
TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 635 
1307 016614 1 BR 17$ 
1308 016616 022737 000020 000502 16$: CMP #20,RCPUER :1S UNIBUS TIMEOUT BIT SET? 
1309 016624 001405 . BEQ 17$ 
016626 012737 °000304 000302 MOV #304, SFATAL sMOVE TO MAILBOX # *exxexe 304 eexeneee 
016634 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
016636 HALT ; INCORRECT CPU ERROR REG CONTENTS 
SCOPE REPLACE HALT WITH 240 
; SAND REPLACE NEXT INST WITH 623 
1310 016640 023727 000474 016504 17%: CMP BUFF -4,#13$ 
1311 016646 001706 ae BEQ 11$ 
016650 012737 000305 000302 MOV #305, $FATAL sMOVE TO MAILBOX # *xeexee 305 teeneeee 
016656 005212 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
16660 HALT OLD PC WAS NOT SAVED OR WRONG $TESTN 
TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 612 
1312 016662 012737 000006 000004 19%: MOV #6,4 : 








} 
a | 


a a = nee een 


Se 


TEST #103 = TEST 


3 016670 
i fs 
1315 
1316 
1317 
1318 
1319 
1 
1 
1 
1 
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005037 


000000 
005237 
012737 





MACRO M111 
NON-EXISTENT ADDRESS T 


000006 


016720 
000500 
016722 
177564 


016720 
000006 


DL $ 
000004 DL11W1: 


23-APR-81 12:47 PAGE 88-2 
RAPS 


core 
#DL11W, 4 
DL11W1 

0 


PROF TE 
#6,4 


CLR 6 
;THIS ROUTINE WILL FIGURE OUT IF YOU HAVE A DL11W 


47 ny CLEAR THE LOCATION 
7SET UP THE STACK POINTER 


‘SET UP THE 


TRAP VECTOR 
TEST THE PUNCH STATUS REGISTER 


SBRANCH IF IT EXISTS 
z INCREMENT IF NO DL11W 


ccc = tn ED SS ea 





CKKABCO 11/44 TRAPS 


TEST #104 = TEST THAT A 


1324 


1335 017062 
017062 
017070 
017072 


36 017074 


a 

INIA 
W 
N 
oO 
= 
N 
= 


39 917112 


032737 


012737 
005212 
000000 


005037 
012737 
005037 


MACRO M1113 23-APR=81 12:47 PAGE 89 
TTY INRUP CAUSES AN OVERFLOW *>4P 


SEQUENCE 


.SBTTL TEST #104 = TEST THAT A TTY INRUP CAUSES AN OVERFLOW TRAP 


[RAAARRRRARAA ERRATA AEE AAE EA AAEAA ARERR ARERERA RARER AAA A EAA A RETR ARE TET E 


;TEST 104 = TEST THAT A TTY INRUP CAUSES AN OVERFLOW TRAP 


PPPPSTTPOTTTTTOTITTT TIT ITTLILL LLL LLL LLL LL Lhd! 


000001 177766 ST104: git #1, CPUERR 
000177 000302 MOV #177, $FATAL 
TNC (R2) 
HALT 
1 177766 BIC #1, CPUERR 
000304 100$: INC $TESTIN 
000104 000304 cme #104, $TESTN 
016720 TST al TE 
RESET 
000340 177776 MOV #340, STATUS 
000400 MOV #400,R6 
017074 000004 MOV #2$,4 
017062 000064 MOV #1$,64 
000100 177564 MOV #100, TTCSR 
177776 CLR STATUS 
000306 000302 MOV #306, $FATAL 
INC (R2) 
HALT 
1$: 
000307 000302 MOV #307, $F ATAL 
INC (R2) 
HALT 
177564 2$: CLR TTCSR 
000006 000004 MOV #6,4 
000006 a CLR 6 


SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
AROUND CLEAR 


BRANCH CL AND HALT IF CLEAR 

SMOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
;SET MSGTYP TO FATAL ERROR 

[CPU POWER BIT FOUND SET 

[CLEAR THE BIT FOUND SET 

[UPDATE TEST NUMBER 

SEQUENCE ERROR? 

SBRANCH TO ERROR HALT ON SEQ ERROR 


LOCK OUT INTERRUPT 


SET UP STACK TO OVERFLOW 
7SET UP OVERFLOW TRAP 
[SET UP_INTERRUPT VECTOR 
[SET INTERRUPT ENABLE 


TALLOW INTERRUPT TO OCCUR 
sMOVE TO MAILBOX # *xeeeee 306 0 teeeeee 


;SET MSGTYP TO FATAL ERROR 

ZNO INTERRUPT OCCURRED 

TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 746 


sMOVE TO MAILBOX # texan 307 9 xeeeeee 
sSET MSGTYP TO FATAL ERROR 

S OVERFLOW TRAP DID NOT OCCUR vr WRONG $TSTNM 
:TO SCOPE REPLACE HALT WITH 240 

+ AND REPLACE NEXT INST WITH 741 

;CLEAR INTERRUPT ENABLE 





017112 


RERESEEES 
ae a 


eee ee ee ee 
—“OVdONAUFSWN— 


WAG 
Vn 


017252 


1353 017254 
017254 


1354 017266 
1355 017272 
1356 017300 


CKKABCO 11/44 TRAPS 
TEST #105 = TEST THAT A 


1340 


Te i 
0 


012737 
005212 
000000 


012737 
005212 


005037 
042737 





MACRO M1113 _23-APR-81 je: 47 PAGE 90 
TRAP OCCURS BEFORE INRUP 


.SBTTL TEST #105 = TEST THAT A TRAP OCCURS BEFORE INRUPT 


{RRRARRAR ERR RARER ERE R ERE E EERE ARERR REAR RARER REAR ERE R REREAD 


STEST 105 = TEST THAT A TRAP OCCURS BEFORE INRUPT 


PPrrrrerrrrrrTrrTTTTTTTITTT TTT TTT LITLE LL LL LLL hth 


000001 
000304 
000105 
016720 


197776 


000310 


000311 


000036 
000100 


177766 
000392 


177766 
000304 


177776 
00 


000302 


000302 


177564 


TST105: BIT 


100$: INC 


1$: 


2$: 


3$: CLR 


#1, CPUERR 
100$ 
#177, $F ATAL 
(R2) 

#1, CPUERR 
STESTN 
#105, STESTN 
PROF TE 

4$ 

#BUF F ,R6 
#340, STATUS 
#1$,64 

#100, TTCSR 
#3$,.34 
#2$.64 
#340, 36 
STATUS 


#310, $FATAL 
(R2) 
4311, $F ATAL 
(R2) 


36 
#100, TTCSR 


SEQUENCE 


7 SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
(CH AROUND CLEAR AND HALT IF CLEAR 
MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
SET MSGTYP 7 FATAL ERROR 
; R FOUND SET 


;SEQUENCE ERROR? 
TBRANCH TO ERROR HALT ON SEQ ERROR 


SET TO A HIGH PRIORITY LEVEL 


: INTERRUPT FOR TTY PUNCH/PRINTER 
; TRAP VECTOR 
TTY was ta 
TIF TRAP TRAPS, MOVE 340 TO PRIORITY 
‘SHOULD. INTERRUPT AT END OF CLR_INST 
TTY INTERRUPT SHOULD OVERRIDE TRAP 


sMOVE TO MAILBOX aaeeeee 310 
;SET MSGTYP TO FATAL ERROR 

ZNEITHER TRAP NOR INRUPT OCCURED 
zTO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 740 


MOVE TO MAILBOX # *eexxee = 3171 
;SET MSGTYP TO FATAL ERROR 

SINRUPT OCCURRED FiRST,OR WRONG $TSTNM 
3TO SCOPE REPLACE HALT WITH 240 

SAND REPLACE NEXT INST WITH 733 


REKKREK 


RERKKKEK 


106 


dD 9 


CKKABCO 11/44 TRAPS MACRO M1113 23-APR=81 12:47 PAGE 91 SEQUENCE 107 
TEST #106 = TEST THAT A PENDING INRUP, INRUP BETWEEN TRAPS 
1357 .SBTTL TEST #106 = TEST THAT A PENDING INRUP, INRUP BETWEEN TRAPS 


TRSEEEEISIEI SI SEISIISER II IOINIEISISNISIOIIIISISIOUOITIISIIOIOITIIIOIIEI IEICE III 


:TEST 106 = TEST THAT A PENDING INRUP, INRUP BETWEEN TRAPS 


SII IE IIIS IIIS IOI IIIISIOIOIIOIUIIIUIIOIUIOIOIIO TT I ttt 


017300 032737 000001 177766 TST106: BIT #1,CPUERR 7SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
017306 001410 BEQ 100$ [BRANCH AROUND CLEAR AND HALT IF CLEAR 
017310 012737 000177 000302 MOV #177, SFATAL [MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
017316 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
017320 000000 HALT CPU POWER BIT FOUND SET 
017322 042737 000001 177766 BIC #1 ,CPUERR ZCLEAR THE BIT FOUND SET 
017330 005237 000304 100$: INC STESTN [UPDATE TES? NUMBER 
017334 022737 000106 000304 CMP #106, $TESTN ;SEQUENCE ERROR? 
017342 001031 BNE 2$ ;BRANCH TO ERROR HALT ON SEQ ERROR 

1358 017344 005737 016720 TST PROF TE 

1359 017350 001046 BNE 4$ 

1360 017352 012706 MOV BUFF ,R6 

1361 017356 012737 000340 177776 MOV #340,STATUS 

1362 017 012737 100 177564 MOV #100, TTCSR 

1363 017372 012737 017424 000034 MOV 3 3; TRAP 

1364 017400 012737 017440 000064 MOV #3$.64 :TTY OUTPUT 

1365 017406 012737 017426 000020 MOV #2$,20 T 

1366 017414 012737 340 MOV #340, 22 S10T PRIORITY 

1367 017422 104400 TRAP ZTHE ACT OF TRAPPING LOWER PRIORITY 

138 pi erse 000004 i: I0T S INTERRUPT SHOULD OCCUR IN PLACE OF IOT TRAP 
017426 012737 000312 000302 MOV #312, $FATAL j;MOVE TO MAILBOX # *xxxxee 312 eeenene 
017434 005212 INC (R2) SET MSGTYP TO FATAL ERROR 


017436 000000 HALT [NO INTERRUPT BETWEEN TRAPS,OR WRONG $TSTNM 
7TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 741 


1370 017440 005037 000022 3$: CLR 22 :CLR IOT PRIORITY 
1371 017444 012737 000036 000034 MOV #36, 34 

1372 017452 012737 000066 000064 MOV #6664 

tL 017460 012737 000022 000020 MOV #22,20 

1375 





1376 


017576 


1384 017600 
1385 017606 
017610 
017616 
017620 


1386 017622 


CKKABCO 11/44 TRAPS 
TEST #107 = TEST THAT “'RESET’’ GOES TO OUTSIDE WORLD 


032737 
001410 
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000001 
000177 
000001 
000304 
000107 
016720 


000100 
000100 


000100 
000313 


000100 
000314 


177766 
000302 


177766 
000304 


177564 
177560 


177564 
000302 


177560 
000302 


SEQUENCE 


.SBTTL TEST #107 = TEST THAT 'RESET’’ GOES TO OUTSIDE WORLD 


{ERR RRA RARER ARERR EERE RARER RERER ERR ARERR RARER EERE ARERR ARERR ERS 


[TEST 107 = TEST THAT ‘'RESET’’ GOES TO OUTSIDE WORLD 


Perr rrerr TTT TTT TTT TTT TTT TTT TTT ELIE LLL LLL LL dd dddddddddedddededededdeddeielelel 


TST107: BIT 


100$: INC 


1$: BIT 


2$: 


4¥ ,CPUERR 
#177, SFATAL 
(R2) 


#1 ,CPUERR 
STESTN 
#107, $TESTN 
TST110=12 
ah 


$ 
#100, TTCSR 
#100,TRCSR 


#100, TTCSR 
#313, $F ATAL 
(R2) 


#100, TRCSR 


TST110 
#314,$FATAL 
(R2) 


+SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
(CH AROUND CLEAR AND HALT IF CLEAR 
“MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
SET MSGTYP TO FATAL ERROR 
;CPU POWER BIT FOUND SET 
[CLEAR THE BIT FOUND SET 
[UPDATE TEST NUMBER 
; SEQUENCE ERROR? 
;BRANCH TO ERROR HALT ON SEQ ERROR 


2 SET INTERRUPT ENABLE 

;SET INTERRUPT ENABLE 
[SHOULD CLEAR INTERRUPT ENABLE 
;TEST FOR CLEAR 


MOVE TO MAILBOX # *xxxaee 3135 
:SET MSGTYP TO FATAL ERROR 
SRESET FAILED TO CLEAR TTCSR 

3TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 754 
; TEST FOR CLEAR 


MOVE TO MAILBOX # *xeexee 63174 
:SET MSGTYP TO FATAL ERROR 
TRESET FAILED TO CLEAR TRCSR,OR WRONG $TSTNM 
TO SCOPE REPLACE HALT WITH 240 

SAND REPLACE NEXT INST WITH 743 


REEKEKE 


REKKKKER 


108 


ey 
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TEST #110 = TEST THAT RESET HAS NO EFFECT ON TRACE 


1399 


1387 .SBTTL TEST #110 = TEST THAT RESET HAS NO EFFECT ON TRACE TRAP 
RARER RARER AERA A AAA R ERA AE RARER AAA EERE ARERR RARER A ARERR EES 
:TEST 110 = TEST THAT RESET HAS NO EFFECT ON TRACE TRAP 
PPreorrrrrrr rT Terr TTT TT TTTTT TTT TTT LT LLL LLL 1 1th 
017622 032737 000001 177766 1ST110: BIT #1 ,CPUERR SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
017630 001410 BEQ 100$ SBRANCH AROUND CLEAR AND HALT IF CLEAR 
017632 012737 000177 000302 MOV #177, SFATAL SMOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
017640 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
017642 HALT [CPU POWER BIT FOUND SFT 
017644 042737 1 177766 BIC #1 ,CPUERR ;CLEAR THE BIT FOUND SET 
017652 005237 000304 100$: INC STESTN [UPDATE TEST NUMBER 
017656 022737 000110 000304 CMP #110, $TESTN 7SEQUENCE ERROR 
017664 001014 BNE 2$ BRANCH TO ERROR HALT ON SEQ ERROR 
1388 017666 012706 000500 MOV MBUFF ,R6 zSET STACK 
1389 017672 012737 017730 000014 MOV #3$,14 [SET UP TRACE VECTOR 
1390 017700 012746 000020 MOV #20,-(R6) 7SET THE T-BIT ON STACK 
1391 017704 012746 017712 MOV #1$,-(R6) ZMOVE NEW PC ON STACK 
1392 017710 000006 RTT 
1393 017712 000005 1$: RESET SHOULD HAVE NO EFFECT 
1394 017714 000005 RESET NO EFFECT 
1395 017716 2s: 
017716 012737 000315 000302 MOV #315, $FATAL MOVE TO MAILBOX # xeeeeee 315 eenenee 
017724 005212 INC (R2) + SET MSGTYP TO FATAL ERROR 
017726 000000 HALT ;TRACE TRAP FAILED,OR WRONG $TSTNM 
[TO SCOPE REPLACE HALT WITH 240 
SAND yt ers NEXT INST WITH 756 
1396 017730 005037 177776 3$ CLR STATUS CLEAR TRACK 
1397 017734 005037 000016 CLR 16 TRACE STATUS 
1398 017740 012737 000016 000014 MOV #16,14 


109 


mn 
1 § 
| 


1411 020074 
1412 020076 
1413 020102 


1418 020132 
020134 


020134 
020142 
020144 


1419 020146 
1420 020152 
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032737 
0 


012737 
005212 


005037 


MACRO M1113 23=APR=-81 12:47 PAGE 94 
TEST #111 = TEST THAT WHEN TTY INRUPTS IT POPS NEW STATUS 


.SBTTL TEST #111 = TEST THAT WHEN TTY INRUPTS IT POPS NEW STATUS 


LRRAAAAAAAA AREA AERA AREER AAAA AAA RAAAAAARAAARERRERARAAEREAERAERAAR RARE TEES 


STEST 111 = TEST THAT WHEN TTY INRUPTS IT POPS NEW STATUS 


PrrrrrrrrrrrTTTTT TTT TTTITITITIT ITIL iT Litt ttt 


000001 
000177 


000001 
000304 
0001171 
016720 


000500 
020052 
177776 

57 


0003 

177564 
177776 
000316 


177776 


000317 


177564 


000066 
000357 


000302 © 


000064 
177776 


000302 


TST111: 


2s: 


3$: 
4$: 


5$: 
6$: 


BIT 


+ “eee 
#177, SFATAL 
(R2) 

#1, CPUERR 
STESTN 
#111,$TESTN 
4$ 

PROF TE 

$ 


TTCSR 
STATUS ,#357 
2$ 
#316, $F ATAL 
(R2) 


#BUFF ,R6 
#3$,64 

66 

#157, STATUS 
TTCSR 
STATUS 

5$ 


#317, $F ATAL 
(R2) 


TTCSR 


SEQUENCE 


3SEE IF BIT 0 OF CPUERR (POWER MONITOR SIT) IS SET 
BRANCH LEAR AND HALT IF CLEAR 
ZMOVE SPECIAL POWER MONITOR FATAL # TO sadeticies 
sSET MSGTYP TO FATAL ERROR 
CPU POWER BIT FOUND SET 
:CLEAR THE . FOUND SET 
T NUMBER 


OR? 
;BRANCH TO ERROR HALT ON SEQ ERROR 
SET UP STACK 


iH RUPT 
:SHOULD SET INTERRUPT ENABLE & INTERRUPT 


sMOVE TO MAILBOX # *eeee0e 316 te eeeee 
;SET MSGTYP TO FATAL ERROR 

+ INTERRUPT DID NOT POP CORRECT STATUS 
3TO SCOPE REPLACE HALT WITH 240 

+ AND REPLACE NEXT INST WITH 746 

:CLR NTERRUPT ENABLE 

: STACK SET UP 
+ INTERRUPT VECTOR 
sCLR NEW STATUS 

sPROCESSOR STATUS 
;SET INTERRUPT ENABLE 


aeetere 


MOVE TO MAILBOX # *eexeee = 317 
7SET MSGTYP TO FATAL ERROR 

7 INCORRECT STATUS,OR WRONG STSTNM 
7TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 7217 


110 
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| 


| 


1421 


1437 020314 
020322 
020324 

1438 020326 

1439 020332 
020334 
020342 
020344 


1442 020370 
443 020374 


CKKABCO 11/44 TRAPS 
TEST #112 = TEST THE walt! INSTRUCTION 


023727 
001405 


012737 
005212 
000000 


005037 


MACRO M1113  Aatiint 12:47 PAGE 95 


177564 


000302 


020314 


000302 


SEQUENCE 


-SBTTL TEST #112 = TEST THE ‘WAIT’ INSTRUCTION 


FRRAAAAA AERA AAA AAAAAAEA AAA AAAAAAAAAAARATEREEA AREA ALATA AAAAAA TAAL EESS 


STEST 112 = TEST THE ‘WAIT’ INSTRUCTION 


PPrrrrrrrrrrTTTTTTITTITITITITITI LILLY 


TST112: BIT 
BEO 


MOV 
iNC 
T 


18: TSTB 
BPL 


MOV 
2s: TSTB 


3$: WAIT 


4$: TST 


5$: CMP 


Soe 


" CPUERR 
#177,$F ATAL 
(R2) 

#1, CPUERR 
STESTN 
#112,$TESIN 
6$ 

PROF TE 

8$ 

#100, TPS 
#BUFF , SP 
#4$,64 

66 

TPS 

1$ 

#15, TPB 

TPS 

35, 1PB 
#100, TPS 
STATUS 
#320, SFATAL 
(R2) 


ae 
#321, SF ATAL 
(R2) 


BUF F-4 ,#3$+2 
7$ 


#322, SF ATAL 
(R2) 


TPS 


3 SEE IF BIT O OF CPUERR (POWER MONITOR BIT) IS SET 
H AROUND CLEAR AND HALT IF CLEAR 
TOR FATAL # TO SFATAL 


; SEQUENCE ERROR? 
;BRANCH TO ERROR HALT ON SEQ ERROR 


: CLEAR a ge te ENABLE 
7SET UP THE STA 
[SET UP THE INTERRUPT VECTOR 


WAIT FOR READY 
:TO 


BE UP 
[D0 A CARRIAGE RETURN 
[WAIT FOR READY TO COME UP 


DO ANOTHER CARRIAGE RETURN 
SET THE a ENABLE 
;CLEAR THE P 

WAIT FOR THe INTERRUPT 

ZMOVE TO MAILBOX # seeeee2 320 
2SET MSGTYP TO FATAL ERROR 


geenene 


HS THE PSwW CORRECT? 


MOVE TO MAILBOX # eeeee22 321 
zSET oe i TO FATAL ERROR 

[NEW PSW SHOULD HAVE BEEN ZERO 
TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 723 
31S THE OLD PC SAVED 


MOVE TO MAILBOX # eeeee22 322 
SET MSGTYP TO FATAL ERROR 

[OLD PC WAS NOT SAVED OR WRONG STESTN 
770 SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 712 
CLEAR INTERRUPT ENABLE 


117 


| CKKABCO 11/66 TRAPS 


ee 


7664 
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MACRO ™1113 oo oe 12:47 


TEST #113 = TEST THAT ALL RESERVED INS T 


000244 


PAGE 96 


SEQUENCE 


- SBTTL TEST #113 = TEST THAT ALL RESERVED INS TRAP 


iTEST 113 = TEST THAT ALL RESERVED INS TRAP 


#51113: 


TRP2SS: 
TRAP1O: 


1$: 
TENSAY: 
SAVSTK: 
TSFCIS: 


TNC IS: 


BIT PUERR 
BEO rH 

MOv #177, SF ATAL 
INC (R2) 

HALT 

BIC #1, CPUERR 
TNC STESTN 

cup #113, STESTN 
BNE RETS 

MOV BTRP2466 , 264 
MOV 10, TENSAV 
MOV @TRAP10. 10 
.WORD 170007 

BR SFCIS 

MOV FPP, FINISH 
atl 

1ST SPASS 

BNE 1$ 

JSR PC PRTMSG 
“WORD  MSGNFP 

atl 

.wORD 0 

-WORD O 

MOV 4 
mov #TNCIS.10 
mOV #160000 ,RO 
TB Savane 
.WORD 76020 

HALT 

BA AD INC 

ZNO CIS OPTION. EMPECTED 
TST $PASS 

BNE 1$ 

JSR PC PRTMSG 
“WORD  MSGNCIS 
MOV @TABLE1, TAB 
ADD #2, (SP) 

RTI 

MOV @TABLE .T 
sp SP, SAVSTK 
BEO 1$ 

JSR PC PRIMSG 
“WORD  CISMSG 
HALT 

BR TSFCIS 

ADD #2, (SP) 

aT! 

OV #2646, 244 





=LOCATION TO SAVE STAC 
PROCES 


SEE IF BIT O OF CPUERR (POWER MONITOR BIT) IS SET 
[BRANCH AROUND CLEAR AND HALT IF CLEAR 
ZMOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 


z1F FPP _IN-- RESET END OF TABLE POINTER 
>; AND RETURN 
: Lee THE TABLE ALONE 

IRST PASS?? 


BRANCH IF NO 
[PRINT MESSAGE POINTED TO BY NEXT 
USING THIS ADDRESS AS THE START oF Th THE MESSAGE 


A PLACE TO STORE CONTENTS OF 10 

K POINTER 
ESSOR HAS CIS OPT 10N 

SET TIME QuT TRAP VECTOR 


4 Ay y- & INST TRAP VECTOR 


ECORRECT TO SHOW 2 EXPECTED PUSHES 
3CIS INST = er (DESTROYS CONTENTS OF RO.R1.R2,83) 
zC1S Ins? FAILED TO TRAP 


TRAP ETHER TO 4 OR 10 DID NOT HAPPEN 
3F IRST PASS 


;PRINT MESSAGE POINTED TO BY THE NEXT WORD 
TUSE THIS ADDRESS TC PRINT THE MESSAGE 


3 CORRECT POINTER TO AFTER THE HALT 
C18 See TF 2 uoRos PRESENT 
D OW THE STACK 


S WERE ne oe 
oe aia SO - CIS SWITCH IN NORMAL POSITION 
60 PRI MESSAGE POINTED TO BY THE NEXT WORD 
USE THIS ADDRESS TO PRINT THE MESSAGE 
;HALT, ALLOWING USER TO PUT SWITCH IN NORMAL POSITION 
G0 BACK TO CHECK AGAIN 
;CORRECT POINTER TO AFTER THE HALT 
;RE TURN 
RESTORE THE TRAP VECTOR 


112 


-—--— - eS ee eae ee ee _ — ee 


| CKKABCO 11/466 TRAPS MACRO M1113 23-APR-B1 12:47 PAGE 96-1 SEQUENCE 
TEST #113 < “Test THAT ALL T RESERVED 1 INS TRAP 


1 13737 020514 000010 "OV v.1 RESTORE THE ILLEGAL Inst. vECTOR 
14 54 12305 GIN): OV (TAB) * FIRST ZFIRST OR CURRENT INSTRUCTION 
1491 56 01 391 "Ov (TAB), LAST :LAST INSTRUCTION OR GROUP 
eS 920660 9205 7 021126 cmp FIRST, FINISH «= S TESTED ALL 
149 1 BEO G! zVES 
149% 9105 ? 9211 MOV FIRST. INST ZSET UP INST 
1495 2 7? 0211 GIN2: INC INST 
149 020676 gi2 37 020720 000010 MOV BRET.10 :SET UP RETURN FROM TRAP 
1497 020706 12706 900500 OV aaurF , 7SET UP STACK POINTER 
1498 020710 005037 177776 CLR cc [CLEAR PRIORITY 
1499 020714 000137 021126 IMP INST SEXECUTE RESERVED INSTRUCTION 
1501 TRAPPING SHOULD SEND YOU HERE 
720 7 000674 RET CMP ‘ ;TEST DECREMENT OF SP 
1503 020726 + ese ott *? 
1 es 012737 000323 000302 MOV #323, SFATAL MOVE TO MAILBOX # eeeeeee 323 seecece 
005212 INC [SET MSGTYP TO FATAL ERROR 
020736 HALT [WRONG DECREMENT 


710 SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 637 


1505 020740 023727 000474 0211350 RET1: CMP BUFF-4,@INST*2 LOC OF INST UNINCREMENTED 
1506 020746 001405 BEQ RET 
1507 020750 0127357 000324 000302 #324, SFATAL ZMOVE TO MAILBOX #@ eeaeeee 524 seeceee 
020756 005212 I (R2) SET MSGTYP TO FATAL ERROR 
020760 T 7 INST INC ON TRAP 
310 SCOPE REPLACE HALT WITH 240 
[AND REPLACE NEXT INST WITH 626 
1508 020762 005737 000476 _ RET2: TST BUF F=2 
1509 020766 001405 BEQ RET3 
020770 RET4: 
020770 012737 000325 000302 MOV #325, SF ATAL MOVE TO MAILBOX # seeeeee 525 seneees 
020776 005212 INC (R2) zSET mscrye TO FATAL ERROR 
021000 T [CONDITION CODES SET ON TRAP_OR WRONG $TSTNM 
7TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 616 
1510 021002 023701 021126 RET3: CMP INST ,LAST 
1511 021006 BOr7es BEQ GIN] SET UP NEW GROUP 
12\¢ 021019 000157 020672 JMP GIN2 FINISH OLD GROUP 
1514 021014 076017 TABLE1: 76017 CIS INSTRUCTIONS 
1515 021016 076032 7 
1516 021020 076037 76037 
1517 021022 076045 6 
1518 021024 076047 76047 
1519 021026 076077 76077 
1520 021030 076117 76117 
1521 021032 076132 76132 
1336 021034 076137 76137 
1523 021036 076145 76145 
1524 021040 076147 76147 
1525 021042 076177 76177 
1526 021044 000007 TABLE : 
1527 021046 000077 77 
1528 021050 000207 207 3RTS,RT1,JMP 
1529 021052 000227 227 
1530 021054 007077 7077 
1531 021056 007777 7777 
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075037 
076017 


MACRO M1113 23-APR-81 12:47 PAGE 96-2 
TEST #113 = TEST THAT ALL RESERVED INS TRAP 


FPP: 


FINISH: 
INST: 


075037 
76017 


K 9 
SEQUENCE 


z; START OF THE FPP INSTRUCTIONS 


END FLAG 

WILL CONTINUE RESERVED INST 
SHOULD TRAP TO LOC 10 

ass 10 SHOULD SEND YOU TO 


114 








021246 


567 021250 
568 021250 
569 021256 
570 021264 
571 asiste 


1572 021306 
1573 021312 
1574 021320 
1575 021326 
1576 
1577 021330 
1578 021334 
021342 
021344 


1579 021346 


02 
021402 


CKKABCO 11/44 TRAPS 
TEST #114 = TEST ILLEGAL HALT 


1558 


032737 


105037 
012737 
005212 
000000 


013737 
37 


013737 
042737 
022737 
001405 


012737 
005212 
000000 






000001 
000177 


000001 
000304 
000114 


177766 
021250 
040000 


177777 
000326 


177766 
177413 
000200 
000327 


177766 
021346 
140000 


177777 
000330 


177766 
177413 
000200 


000331 


177766 
000302 


177766 
000304 


000004 
177776 


000302 


000502 


000302 


000004 
177776 


000302 


000502 
000502 
000502 


000302 


L 9 


MACRO M1113 23-APR-81 12:47 PAGE 97 SEQUENCE 115 


.SBTTL TEST #114 = TEST ILLEGAL HALT 


{RARER AERA AREER EAE EERE RAE RAR ERA EEARERAE RARER ERE EATS 


[TEST 114 = TEST ILLEGAL HALT 


PPecrrrrerr rT Trr TTT Tee TTT TT TTT TTT TT i titi iii iii itis iii tT oD) 


TST114: BIT #1, CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
BEQ 100$ CH AROUND CLEAR AND HALT IF CLEAR 
MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
INC (R2) ‘SET MSGTYP TO FATAL ERROR 
HALT ‘CPU POWER BIT FOUND SFT 
#1, CPUERR ‘CLEAR THE BIT FOUND SET 
100$: INC $TESTN [UPDATE TEST NUMBER 
CMP #114, $TESTN SSEQUENCE ERROR? 
BNE 4$ “BRANCH TO ERROR HALT ON SEQ ERROR 
MOV #BUFF , SP ‘STACK POINTER SETUP 
CLR CPUERR ‘CLEAR CPU ERROR REGISTER 
MOV #1$,RTRAPS ‘SETUP TRAP RETURN 
BIS #040000, PSW *GO TO 


SUPER MODE 
[EXECUTE INST UNDER TEST 


FAILURE, NO 
PSW+1 :;GO BACK TO KERNEL 
MOV #326,$F ATAL s;MOVE TO MAILBOX # *eeeeee 326 xeeeeee 
INC (R2) + SET MSGTYP TO FATAL ERROR 
HALT HALT IN SUPER MODE FAILED TO TRAP 


[TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 755 


1$: 
MOV CPUERR,RCPUER ;READ AND SAVE CPU ERROR REGISTER 
BIC ACERMSK,RCPUER ;:MASK OFF UNUSED CPU aed 4REG BITS 
a tations :1S ILLEGAL HALT BIT SET? 
MOV #327, $F ATAL sMOVE TO MAILBOX # *xeexee 527 xeeeKeee 
INC (R2) :SET MSGTYP TO FATAL ERROR 
HALT INCORRECT CPU ERR REG CONTENTS 
TO SCOPE REPLACE HALT WITH 240 
REPLACE NEXT INST WITH 736 
23: CLR CPUERR CLEAR CPU ERR REG 
MOV #3$,RTRAPS *SETUP TRAP RETURN 
BIS #140000 ,PSW ;GO TO USER MODE 
;FAILURE, NO 
PSW+1 360 * TO KERNEL 
MOV #330,$FATAL [MOVE T MAILBOX # **eeewe 330 9 teeeene 
INC (R2) SET MSGTYP TO FATAL ERROR 
HALT SHALT IN USER MODE FAILED TO TRAP 
:TO SCOPE REPLACE HALT WITH 240 
35 + AND REPLACE NEXT INST WITH 716 
MOV CPUERR,RCPUER ;SAVE CPU ERROR REGISTER 
BIC ACERMSK ,RCPUER >MASK OFF UNUSED CPU . 5REG BITS 
CMP #200,RCPUER :1S ILLEGAL HALT BIT SET? 
-: BEQ 5$ 
MOV 4331,$FATAL sMOVE TO MAILBOX # xexeeee 33] teeenee 
INC (R2) 2 SET MSGTYP TO FATAL ERROR 


Qasim ints Gti inet ines taerinntnin hice j 
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MACRO M1113 23-APR-81 12:47 PAGE 97-1 


TEST #114 = TEST ILLEGAL HALT 


1584 021404 5$: 
1585 021404 005037 177766 CLR CPUERR 
1586 021410 105037 177777 CLRB PSW+1 


3;GO BACK TO KERNEL MODE 


SEQUENCE 


116 


d a 
- * 





CKKABCO 11/44 TRAPS MACRO M1113. 23-APR-81 12:47 PAGE 98 SEQUENCE 117 
TEST #115 = TEST SPL INST. FOR NOP IN USER/SUPER MODES | 
1587 _SBITL TEST #115 = TEST SPL INST. FOR NOP IN USER/SUPER MODES | 
ERR RAAR AREA AAREREREEE AAA AA RARER ARERR RRARRAAERARERA REAR RAE R REE R ES j 
“TEST 115 - TEST SPL INST. FOR NOP IN USER/SUPER MODES | 
PPC rrrrerr rere rT Terr TTT TT TTT TTT TTT TTT TTT LILLE LL LLL ee | 
021414 032737 000001 177766 {ST115: BIT  #1,CPUERR “SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET | 
021422 001410 BEQ —s-: 100 SBRANCH AROUND CLEAR AND HALT IF CLEAR | 
091494 012737 000177 000302 MOV «#177, SFATAL MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL | 
091482 005212 INC (2) <SET MSGTYP TO FATAL ERROR 
051434 000000 HALT CPU POWER BIT FOUND SET 
091436 042737 000001 177766 BIC #1 -CPUERR CLEAR THE BIT FOUND SET 
091444 005237 000304 1008: INC  $TESTN “UPDATE TEST NUMBER 
051450 022737 000115 000304 CMB «115, STESTN SEQUENCE ERROR? | 
021456 001125 BNE “BRANCH TO ERROR HALT ON SEQ ERROR 
1588 021460 012706 000500 MOV “SETUP STACK 
1889 021464 052737 040000 177776 BIS FEU SP “GO TO SUPER MODE 
1590 021472 000277 SCC “SET CC 
1891 021474 000231 SPL SPL SHOULD=NOP IN USER/SUPER MODES 
1592 021476 000232 SPL , 
1598 021500 000233 sPLiéSS 
1594 021502 000234 SPL 
1595 021504 000235 SPL 5 | 
1596 021506 000236 sPLtét 
1597 021510 000237 SPL? 
1898 021512 013737 177776 022426 MOV SW, S :SAVE PSW 
1399 021520 023727 022426 040017 ey Seu w040017 «oS VARIFY THAT PSW HAS NOT CHANGED 
1600 091526 001407 BEQSts«édSS 
- 1601 021530 105037 177777 CLRB ss PSw+1 G0 BACK TO KERNEL | 
1602 021534 012737 000332 000302 MOV so #332.$FATAL “MOVE TO MAILBOX # weeexee 332 seeeene | 
021542 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
021544 000000 HALT <PRIORTY LEVELS CHANGE 
;TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 744 
1603 021546 012737 040340 177776 1$: MOV #040340,PSW ——«:SET PRIORTY TO 7 
1604 021554 000257 ccc CLEAR CONDITION CODES 
1605 021556 000230 SPL téO “SPL SHOULD=NOP IN SUPERVISOR MODE 
1606 021560 013737 177776 022426 MOV _—~PSW, SPSW < SAVE PSW 
1607 021566 023727 022426 040340 (MP —«sSPSW. #040340: VARIFY THAT PSW PRIORTY AND CONDITION CODES HAVE NOT C 
1608 021574 001407 BEQ tS 
1809 021576 105037 177777 CLRB 4 PSW+1 :GO BACK TO KERNEL 
1610 021602 012737 000333 000302 MOV #333. SFATAL “MOVE TO MAILBOX # eeeeeee 333 teeenen 
021610 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
021612 000000 HALT ‘SPL INSTRUCTION CHANDED PSW SHOULD BE NOP 
:TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 721 
1611 021614 012737 140000 177776 28: Vv _-#140000.PSW -«2G0 _ TO USER MODE 
1612 021622 77 SCC “SET CC 
1613 021624 000231 SPL (tid ‘SPL SHOULD=NOP IN USER MODE 
1614 021626 000232 SPL (iti 
1615 021630 000233 SPL (itéS | 
1616 021632 000234 SPL iG 
1617 021634 000235 SPL ti‘*SS | 
1618 021636 000236 SPL CG | 
1619 021640 000237 SPL 
1620 021642 013737 177776 022426 MOV —s~PSW, SPSW SAVE PSW 
1621 021650 023727 022426 140017 (MP _—«SPSW.#140017 =: VARIFY THAT PSW HAS NOT CHANGED | 
1622 021656 001407 BEQStsé8S a 
1623 021660 105037 177777 CLRBPSw+1 :GO BACK TO KERNEL | 
| 
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TEST #115 = TEST SPL INST. FOR NOP IN USER/SUPER MODES 


1624 021664 012737 000334 000302 MOV #334, SFATAL :MOVE TO MAILBOX # teaeene 334 «eneeee 
021672 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
021674 000000 | HALT ;PRIORTY LEVELS HAS CHANGED 
“TO SCOPE REPLACE HALT WITH 240 
; SAND REPLACE NEXT INST WITH 670 
1625 021676 012737 140340 177776 38: MOV #140340,PSW SSET PRIORTY TO 7 
1626 021704 000257 ccc SCLEAR CONDITION CODES 
1627 021706 000230 SPL 0 [SPL SHOULD=NOP IN USER MODE 
1628 921710 013737 177776 022426 MOV PSw,SPSW SAVE PSW | 
1629 021716 023727 022426 140340 CMP SPsu, #140340 :VARIFY THAT PSW PRIORTY AND CONDITION CODES HAVE NOT CHANGE 
1630 021724 001407 BEQ F SPL | 
1631 021726 105037 177777 CLRB = PSw#1 :GO BACK TO KERNEL 
1632 021732 SEQ: 
021732 012737 000335 000302 MoV #335, $F ATAL :MOVE TO MAILBOX # *xaeene 335 eexnene 
021740 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
021742 000000 HALT [SPL iNST.CHANGED PSW OR WRONG TEST# 
[TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 645 
1633 021744 FSPL: 


3GO BACK TO KERNEL 


1634 €21744 105037 177777 RB PSwW+1 
;THIS TEST VARIFIES FOR ALL COMBINATIONS OF PIR AND PROCESSOR 


1635 

1636 SPRIORTY LEVELS THAT REQUESTS ARE GRANTED (TRAP TO 240 OCCURS 
1637 BY THE ae te? eat ONLY WHEN THE PIR IS AT A HIGHER LEVEL THAN 
1638 ; THE PROCESSOR 

1639 ;THE CONTENTS OF SPIR,SPSW AND TRP240 SHOULD BE EXAMINED ON ERROR. 
1640 ;SPIR BITS 2-0 CONTAINS ONE LESS THAN THE PIR REQUEST LEVEL AT 
1641 : THE TIME OF ERROR.SPSW BITS 2-G CONTAINS THE PROCESSOR PRIORTY 
1642 TAT THE TIME OF ERROR.TRP240 INDICATES WHETHER OR NOT A TRAP WAS 
1643 sEXPECTED (1= EXPECTING TRAP TO 240) 

1644 ;THE SPL INSTRUCTION IS USED TO SETUP PROCESSOR PRIORTY. 

1645 SNOTE: THIS IS THE FIRST REAL TEST OF THE SPL I 

1646 ERROR, IF EXPECTED PIRQ TRAP DID NOT OCCURE VARIFY SPL 

1647 SOPERATION BY COMPARING S?SW BITS<2-0> WITH PSW PRIORTY 

1648 ;BITS<?7-5>. ON ERROR IF AN UNSPECTED PIRQ TRAP OCCURED 


:PROCESSOR PSW<7-5> ON STACK. 








TEST #116 = 





1652 


021750 


1659 022056 
1 064 


660 

1661 022072 
1667 022100 
1668 022104 


1669 
1670 022112 


1688 022214 
1689 


68 

1690 022216 

1691 022220 

1692 022224 
022226 


1693 022240 
1694 


1695 
1696 022242 





CKKABCO 11/44 TRAPS 


032737 
0 


000240: 


005237 
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TEST PIRQ LEVELS AND SPL INSTRUCTION 


022430 
177707 


022424 


022424 
022432 
177777 
022434 


000007 
022426 


022432 
000336 


022430 


000026 
000240 
000242 
177776 


022426 
022432 


022214 
022214 


000302 


C 10 
SEQUENCE 


.SBITL TEST #116 = TEST PIRQ LEVELS AND SPL INSTRUCTION 


{RRR E EERE REAR ARERR A EERE ARAAERER ARERR ERA A ERE ARERR EES 


[TEST 116 = TEST PIRQ LEVELS AND SPL INSTRUCTION 
PPorrrrrerrrT TTT TT TTT TTT TTTTI TIT ILT LLL LLL LL 11111 ddd hid ide 
TST116: BIT #1, CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
BEQ 100$ SBRANCH AROUND CLEAR AND HALT IF CLEAR 
MOV #177 ,SFATAL ;MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
INC (R2) SET MSGTYP TO FATAL ERROR 
HALT CPU POWER BIT FOUND SET 
BIC #1, CPUERR CLEAR THE BIT FOUND SeET 
100$: INC STESTN UPDATE TEST NUMBE 
CMP #116, $TESIN ; SEQUENCE ERROR? 
BNE PTRP BRANCH TO ERROR HALT ON SEQ ERROR 


7SET LOCATION ZERO TRAP VEC 


MOV AT4TRP,4 ;SET UP FAILURE TRAP VEC 
MOV #340,6 
ae MT24TRP,24 ;SETUP POWER FAIL VEC 


SETUP PIRQ VEC 
ZSET 242 TO PRIORTY 7 


ZSETUP STACK 
7SET PROCESSOR PRIORTY TO 7 


#340, 
MOV #PQTRP,,PIRVC1 
MOV #340,PIRVC2 
MLOOP: MOV wBUFF , SP 


BIS #340,PSW 
; COMPUTE EXPECTED RESULT 
MOV PIRPSW 
BIC Wa7POr. RO ZSETUP SPIR 
ASR RO 
ASR RO 
ASR RO 
MOV RO, SPIR ;SAVE RO IN SPIR 
MOV PIRPSW,RO 
BIC #177770,RO :SETUP SPSW 
MOV ‘ RO,SPSW 
CMP SPIR,SPSwW 
BGE 2$ ;BRANCH IF pir > PSW 
cLR TRP240 *CLEAR F 
2$: MOV #177777, TRP240 SET F LAG 
3$: JSR PC, SETPIRQ SE TU PIRQ BASE ON THE # IN SPIR 
>SET PSwW PRIORTY BASE ON THE # IN SPS 
BIC #7,1$ CL LEAR LSB 3 BITS OF SPL INST.AT 1$ 
BIS SPSw,1$ ‘SET LSB 3 BITS OF SPL INST.TO DESIDED PROC. PRI. 
1$: SPL 0 3 THE ACTUAL PRIORTY SET INTO THE PSW IS CONTROLLED BY 
a THE PREVIOUS TWO INSTRUCTION. 
TST TRP240 
BEQ NXTST 
MOV #336, $FATAL sMOVE TO MAILBOX # *«*exee8 3360 eeeaee 
INC (R2) ‘SET MSGTYP TO FATAL ERROR 
HALT ‘EXPECTED PIRQ TRAP BUT DID NOT GET IT 
*TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 717 
NXTST: NOP “SET UP FOR PASS COUNT 


INC PIRPSwW SETUP FOR NEXT PASS THROUGH LOOP 


119 


CKKABCO 11/44 TRAPS 
TEST 


#116 = TEST PIRQ 


1697 022246 


1 
1 
1 


1 
1 


YNoO 


00 262 
01 022270 


“N 
Oo 
Nm 
ooo 
rmnrr 
rrr 
~w 
“N 
a 


06 02 
07 022324 
08 0 


723 022410 
724 022412 
725 022412 
C22420 
022422 


726 022424 
727 022426 
728 022430 


023727 


000735 


012737 
005212 
000000 


000523 


012737 
005212 
000000 


000721 


012737 
005212 
000000 


000713 


012737 
005212 
000000 
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LEVELS AND SPL INSTRUCTION 


022430 
177772 
000006 
000006 
000000 
023424 
000242 
000242 
022630 
022432 
000337 


000340 
000341 
000342 


000343 


000070 


000004 
000024 
000240 


000302 


000302 


000302 


000302 


000302 


PQTRP: 


PTRP: 


ZTRP: 


T4TRP: 


T24TRP: 


PIRPSW: 


PIRPSW,#70 
MLOOP 

PIRQ 

#6,4 

6 

0 

APWRDWN, 24 
#242, 240 


TS7117 
TRP240 


NXTST 
#337 ,SFATAL 
(R2) 


NXTST 
#340, SFATAL 
(R2) 


TST117 
#341,$FATAL 
(R2) 


NXTST 
#342, $F ATAL 
(R2) 


NXTST 
#343, $F ATAL 
(R2) 


-WORD 0 
-WORD OQ. 
«WORD 0 


SEQUENCE 


;BRANCH TO MLOOP IF COUNT IS LESS THAN 70 
DONE WITH LOOPING PIRQ REQUESTS 
RESTORE RETURNS 


z;PRIORTY TRAP SERVICE 


sMOVE TO MAILBOX # *#ee0%8 337 wkeeeee 
;SET MSGTYP TO FATAL ERROR 

S EXPECTED NO PIRQ TRAP,BUT GOT ONE 

3TO SCOPE REPLACE HALT WITH 240 

‘AND REPLACE NEXT INST WITH 655 


sMOVE TO MAILBOX # sexxeee 340 9 taeenee 
:SET MSGTYP TO FATAL ERROR 
; WRONG TEST NUMBER 
[TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 615 


sMOVE TO MAILBOX # ***ee%8 341 xeeKnne 

7SET MSGTYP TO FATAL ERROR 

[UNSPECTED TRAP TO ZERO OCCURED DURING PIRQ TST 
TO SCOPE REPLACE HALT WITH 240 

SAND REPLACE NEXT INST WITH 641 


sMOVE TO MAILBOX # **exee® 342 wxaxxane 
:SET MSGTYP TO FATAL ERROR 

S UNSPECTED TRAP TO 4 DURING PIRQ TESTING 
:TO SCOPE REPLACE HALT WITH 240 

SAND REPLACE NEXT INST WITH 633 


:MOVE TO MAILBOX # *taeeee 343 xeeneee 

“SET MSGTYP TO FATAL ERROR 

“UNSPECTED POWER FAIL TRAP DURING PIRQ TESTING 
[TO SCOPE REPLACE HALT WITH 240 

SAND REPLACE NEXT INST WITH 625 


120 








E 10 
CKKABCO 11/44 ore MACRO M1113 23-APR=81 12:47 PAGE 100 SEQUENCE 121 
TEST #116 = TEST PIRQ LEVELS AND SPL INSTRUCTION 


1730 177772 PIRQ=177772 
1731 000240 PIRVC1=240 
1732 000242 PIRVC2=242 
\ze @ 022432 000000 TRP240: .WORD 0 
1735 
1736 022434 SETPIRQ: 
1737 022434 023727 022424 000000 CMP SPIR,#0 
1738 022442 001435 BEQ 1$ 
1739 022444 023727 022424 000001 CMP SPiR,#1 
1740 022452 001435 BEQ $ 
1741 022454 023727 022424 000002 CMP SPIR,#2 
1742 022462 001435 BEQ 
1743 022464 023727 022424 000003 CMP SPIR,#3 
1744 022472 001435 BEQ 4$ 
1745 022474 023727 022424 000004 CMP SPIR,#4 
1746 022502 001435 BEQ 
1747 022504 023727 022424 000005 CMP SPIR,A5 
1748 022512 001435 BEQ $ 
1749 622514 023727 022424 000006 CMP SPIR,#6 
1750 022522 001435 BEQ 7 
1751 022524 012737 000344 000302 MOV #344 ,$F ATAL MOVE TO MAILBOX # *#eeeee 344 xeKeeee 
0225 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
22534 000000 HALT :# IN SPIR DOES NOT MAKE SENSE OR SPIR NOT=0-6 
3TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 560 
1752 022536 012737 001000 177772 1$: MOV #1000,PIRQ 
1753 022544 000430 BR 10$ 
1754 022546 012737 002000 177772 2$: MOV #2000,PIRQ 
1755 022554 000424 BR 1 
1756 022556 012737 004000 177772 38: MOV #4000 ,PIRQ 
1757 022564 000420 BR 1 
1758 022566 012737 010000 177772 4$: MOV #10000 ,PIRQ 
1759 022574 000414 BR 1 
1760 022576 012737 020000 177772 S5$: MOV #20000 ,PIRQ 
1761 022604 000410 BR 10 
762 022606 012737 040000 177772 6$: MOV #40000 ,PIRQ 
763 022614 000404 BR 
1764 022616 012737 100000 177772 7$: MOV #100000 ,PIRQ 
765 022624 000400 BR 10$ 
1706 022626 000207 10$: RTS PC 
1768 
1769 ; TABLE FOR PIRQ SETUP 
1770 ;SPIR = PIR LEVEL SETPIROQ # LOADED INTO PIRQ REG RO 
1771 :0000 1 BIT9 1000 
1772 :0001 2 B1IT10 2000 
1773 30002 3 BIT11 4000 
1774 ;0003 4g BIT12 10000 
1775 3000 5 BIT13 20000 
1776 30005 6 BIT14 40000 
1777 30006 7 BIT15 100000 


‘pecaaenerenen 
CKKABCO 11/44 TRAPS 


1778 


“SN 
oo 
Ww 
oo 
mn 
mn 
N 
nN 
Nm 


84 724 
85 022732 
86 


ke ak ad ed a ed 
NN 


SN NN 
&S 


1790 022746 
1791 eS hen 


032737 
0 


012737 
005212 
000000 
000405 


012737 
005212 
000000 
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TEST #117 = CHK ODD ADRS TRAP WITH SP AT ODD ADRS ON RTI 


TEST #117 = CHK ODD ADRS TRAP WITH SP AT ODD ADRS ON RTI 


000001 
000177 


000001 
000304 
000117 
140000 
000001 
022724 
000340 


030340 


000345 


000346 


177766 
000302 


177766 
000304 
177776 


900004 
000006 


177776 


000302 


000302 


« SBTTL 


SEQUENCE 


FERRARA AERA AAA A AAA E AAA AERA ERATE AA RAAARRAAA AREA A RARE EERE EEE 


:TEST 117 = CHK ODD ADRS TRAP WITH SP AT ODD ADRS ON RTI 


Prerrrrrrrr rT TT TeTTTTTTTTITITTTTITT Ti Tiit iti titties 


1S1117: BIT 
BEO 


100$: INC 


1$: CMP 
BE 


#1, CPUERR SEE IF BIT O OF CPUERR (POWER MONITOR BIT) IS SET 
100$ [BRANCH AROUND CLEAR AND HALT IF CLEAR 
#177, SFATAL [MOVE S POWER MONITOR FATAL # TO SFATAL 


SPECIAL 
(R2) #SET MSGTYP TO FATAL ERROR 
CPU POWER BIT FOUND SFT 


#1, CPUERR [CLEAR THE BIT FOUND SET 
STESTN ‘UPDATE TEST NUMBER 
#117, $TESIN SSEQUENCE ERROR? 
OATSE “BRANCH TO ERROR HALT ON SEQ ERROR 
#140000,177776 :SET CURRENT MODE TO USER 
#1,SP ‘PUT ODD ADDRESS IN STACK POINTER 
#1$,4 *TRAPS TO 1$ 
#340,6 ;PRIORITY 10 7 
“TEST RTI = SHOULD ODD ADDRESS TRAP 10 4 
#30340, 177776 


ZSEE IF PREVIOUS MODE USER AND PRIORITY 7 LOADED 
BRANCH OUT IF OK 


geerecnerreencsecerenegpeeweuatersecatoorseonsorssosnenanenennsccqneseswhés 


y1F PSw CONTAINS 30000, YOU MIGHT BE MISSING ECO #6. 


ee eee Nene een eReReeREREEERTHERAREARERRERNAERAEA REAR EAR AE ERT R ETRE REET ES 


MOV 
INC 
HALT 


6R 
OATSE: 

MOV 

INC 

HALT 


:MOVE TO MAILBOX # seeeeee 345 teenene 
:SET MSGTYP TO FATAL ERROR 

:PSW NOT PROPERLY LOADED 

3TO SCOPE REPLACE HALT WITH 240 


ZAND REPLACE NEXT INST WITH' 752 


#345, SFATAL 
(R2) 


END [BRANCH TO END ROUTINE 
#346, $F ATAL MOVE TO MAILBOX # seeeeee 346 txeeene 
(R2) ;SET MSGTYP TO FATAL ERROR 


[WRONG $TSTNM 
7TO SCOPE REPLACE HALT WITH 240 
TAND REPLACE NEXT INST WITH 744 


122 


foo 


| CKKABCO. 11/46 TRAPS 
| END OF PASS ROUTINE 


| 
| 


ERPS 


ee 


SESRaR 


a eee ee ee ee ee ee 
hom 


00 00 00 00 CO Co 
— teed ot td od 
WFwnr—-oO 


ooo 


177777 
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000306 
023070 


000040 
000042 
023510 


177761 
000042 


000321 
023042 


023070 


000610 


END: N 
INCB 
BNE 


ACT: MOV 


SENDAD : 


GOAGIN: 


J 
PASSPT: <1 


G 10 
SEQUENCE 


-SBTTL END OF PASS ROUTINE 
INC $SPASS 


PASSPT :SHOULD PRINT THIS PASS? 

#40,SENVM ‘WILL APT ALLOW PRINTING? 

ACT “NO 

42 -wSE NDAD 

PC .PRTMSG :PRINT MESSAGE POINTED TO BY THE NEXT WORD 
MSS [USE THIS ADDRESS TO PRINT THE MESSAGE 
#177761,PASSPT ;DO IT ABOUT 15 DECIMAL TIMES 

42,h0 “CHECK ACT 

GOAGIN “KEEP GOING 

PC, (RO) :ACT HOOKS 

| eg 

RESTRT . :DO NEXT PASS 


123 


#4 10 


| CKKABCO 11/44 TRAPS = MACRO. M111. 23-APR=81 12:47 PAGE 103 SEQUENCE 
| ASCII MESSAGES 

1816 .SBTTL ASCII MESSAGES : 

1817 02307 O15 12,103. CISMSG: "ASCI] <15><12>.CIS SWITCH IS IN THE MAINTENANCE POSITION.<15><12> 

1818 02314 i202 s«12 126 “ASCIZ PUT IN NORMAL POSITION AND CONTINUE . <15><12> 

1819 023215 015 O12 105 MSG:  -ASCIZ <15><12>.END OF CKKABCO 11/44 TRAPS. 

023252 015, —ti‘éC TP 103 PNAME: _ASCIZ <15><12>*CKKABCO 11/44 TRAPS+ 

1821 023300 ««015.isSS—ié«‘i103”sSTTLE: ©LASCIZ <15><12>+CKKABCO 11/44 TRAPS*<15><12> 

1892 023830 015 O12 116 MSGNFP: -ASCIZ <15><12>.NO FLOATING POINT OPTION PRESENT. 

1898 093373 «1S. s«13=—Ss«176sMSGNCIS:.ASCI2 <15><12>.NO CIS OPTION PRESENT . 


LEVEN 


—— 


———- se 
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— POWER DOWN AND POWER UP ROUTINES 


1825 oe .SBTTL 
1826 02 012737 623636 000026 PwRDWN: MOV 
182? 023432 000000 wai? 
1829 023636 012737 023426 000024 PwRUP: MOV 
1830 02 01 706 000500 "Ov 
| 1831 02 132 000040 000327 BITS 
1832 023454 001003 ONE 
183 923456 004737 023510 JSR 
18% O02 023470 WORD 
| 1835 023466 000137 900540 CERES: IMP 
1836 023470 075 0t2 120 @SGPwR: .ASCIZ 


POWER DOWN AND POWER UP ROUTINES 
SPURP 24 


BOrRDWN , 26 
aBUF F , SP 
#60, SENVM 
PERES 

PC PRIMSG 
mS “Put 

RE STAY 


1 10 
SEQUENCE 125 


zWILi APT ALLOW PRINTING? 


[PRINT MESSAGE POINTED TO BY THE NEXT WORD 
[USE THIS ADDRESS TO PRINT THE MESSAGE 


<15><12>. POWER FAILED:. 


-——----—--—__—_ 


310 
| CemaBcd 11766 TRAPS MACRO M1113 2%<aPR-Bl 12:47 PAGE 105 SEQUENCE 126 
SUBROUTINE TO PRINT & MESSAGE 
1837 .SATTL SUBROUT INE TO PRINT A MESSAGE 
18 10 17600 600000 PRIMSG: MOV @0(SP) RO SMOVE MESSAGE START ADDRESS TO RO 
18 1% 1g 900002 ADD esps FUDGE RETURN OVER STARTING ADDRESS PARAMETER 
132737 000060 000327 Bis ab, SENVE twILL APT ALLOW PRINTING? 
1841 023526 001011 BNE [BRANCH IF NO 
105737 177564 23: TSsT8 Hs I ;Ttv a 
1843 02 100375 BPL 28 [NO WAIT 
1844 0235 1120 7? 177566 move =: (RO) +, TPB [PRINT CHARACTER 
1845 02 001372 ‘ BNE 28 [NEXT IF NOT DONE. 
1846 023544 105737 177566 zg: TS1R TRS 
184? O2 359 100375 BPL zg 








SEQUENCE 127- 


K 1 
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SUBROUTINE TO PRINT A MESSAGE 


CKKABCO 11/44 TRAPS 


END 


000001 


1849 








L 10 


CKKABCO 11/44 TRAPS MACRO M1113 23-APR-81 12:47 PAGE 106-1 SEQUENCE 128 
SYMBOL TABLE 
ABASE = 000000 BU PTRP 022346 TST113 020374 TST64 013550 
ACDW1 = 000000 cc = 177776 PWRDWN 023424 TST114 021140 TST65 013656 
ACDW2 = 000000 CERMSK= 177413 PWRUP 3434 TST115 021414 013764 
Cc = CISMSG 023072 RCPUER 000502 TST116 021750 TST67 =—014072 
ACT 023032 C = 177766 RESTRT 000 TST117 022630 TST7 002516 
= DLI1W 016722 RET 020720 isti¢ 34 TST70 §©014220 
1 = DL11W1 016726 RET1 020740 TST1 003440 TST71 014326 
ADDW10= 000000 22762 RET2 020762 TST14 003540 TST72 014464 
ADDW11= 000000 FINISH 021124 RETS 021002 TST15 TST73 §=—- 014570 
ADDW12= 000000 =%00000 RET4 020770 TST16 004016 TST74 014714 
ADDW13= 000000 021120 RTRAP = 000010 TST17 = 004342 TST75 015026 
ADDW14= 000000 FSPL 021744 RTRAP1= 000034 TST 001232 TST76 §=©015136 
ADDW15= 000000 GIN1 020654 RTRAP2= 000020 TST20 004470 TST77 ~=—.: 015276 
ADDW2 = 000000 G 06 RTRAPS= 000030 TST21 004562 TTCSR = 177564 
ADDW3 = 000000 GINS 021140 RTRAP4= 000014 TST22 004662 T24TRP 022412 
ADDW4 = 000000 GOAGIN 023052 RTRAPS= TST23 004764 T4TRP 022376 
ADDWS = 000000 HERE = 000000 R6 =%000006 TST24 005142 ZTRP 02236 
ADDW6 = 000000 HLT = 000000 =% 7 TST25 005500 $APTHD 0003 
ADDW7 = 000000 ILLA = 004700 SAVSTK 020516 TST26 005572 $ 000326 
ADDW8 = 000000 ILLB = 000100 Q 02173 TST27 005672 $DEVCT 00031 
= 000000 INST 021126 SETPIR 022434 TST3 001612 023042 
ADEVCT= KTSTA 000506 SPIR 022424 TST30 §©005774 SENV 00032 
ADEVM = { KTVEC 000504 PSwW 02242 TST31 0061 SENVM = 000321 
ADJNC JU 0 K1 000626 STATUS=_ 177776 TST32 006472 SERN = 000347 
= 000000 K10 000644 TAB  ==%000003 TST33 006620 SERROR= 000302 
AENVM = 000000 K11 000646 TABLE 021044 TST34 006712 SETABL 000320 
AFATAL= 000000 K12 000650 TABLE? 021014 TST35 007012 SETEND 000330 
= 000000 K2 0 TENSAV 020514 TST36 4 ©=©007114 $FATAL 000302 
= 000000 K3 000632 TITLE 0233500 TST37 =©007272 $HIBTS 000330 
AMADR3= 000000 K4 TNCIS 020560 TST4 002102 S$MAIL 
AMADR4= 000000 K5 TPB = 177566 TST40 SMBADR 000332 
AMAMS1= 000000 K6 000640 TPS = 177564 TST41 007722 $MSGAD 000314 
AMAMS2= 000000 TRAPA = 10 TST42 00 $MSGLG 000316 
AMAMS3= 000000 LAST =%000001 TRAP10 020476 TST43. = 010124 S$MSGTY 0003 
AMAMS4= 000000 022100 TRCSR = 177560 TST44 010302 $PASS 000306 
AMSGAD= 000000 MSG 023215 TRP240 022432 TST45 10622 $SPASTM 000336 
AMSGLG= 000000 MSGNCI 023373 TRP244 020466 TST46 §=6010714 $SVPC = 000300 
AMSGTY= 000000 |. MSGNFP 023330 RT = 000 TST47 =©011014 $SWR = 000 
= MSGPWF 023470 TSFCIS 020520 TST5 002324 $SWREG 000322 
P2= = 000240 TST1 000 TST5O =©—.011116 $TESTN 0003 
AMTYP3= 000000 NXTST 022240 TST1O0 002620 TST51 = 0111274 STN = 000120 
AMTYP4= 000000 TSE 022750 TST100 015422 TST52 011612 $TSTM 0003 
APASS = 000000 PASSPT 023070 TST101 015744 TST53) =: 00111774 STSTNM= 0003 
= 000000 PFRES 023464 TST102 016114 TST54 012076 IT 000312 
AROUND 020606 PIRPSW 022430 TST103 016240 TST5S § 012202 SUNITM 000340 
ASWREG= 000000 PIRQ = 177772 TST104 016734 TST56 =©012364 SUSWR 000324 
ATESTN= 000000 PIRVC1= 000240 TST105 017112 TST57 =. 012710 $x = 022674 
AUNIT = 000000 PIRVC2= 000242 TST106 017300 TST6 002416 $XX = 177745 
AUSWR = 000000 PNAME 023252 TST107 017466 TST60 013050 $XXX = 000744 
AVECT1= 000000 PQTRP 022324 TST11_ 002776 TST61 013150 $Y = 022014 
AVECT2= 000000 PROFTE 016720 TST110 017622 TST62 013334 $yY = 022100 
BEGIN 000510 PRTMSG 023510 TST111 017746 TST63 013442 -$x = 00033 
BELL = 000240 PSW = 177776 TST112 020152 


- ABS. 023554 000 
000000 
ERRORS DETECTED: 


caine 
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SYMBOL TABLE 


VIRTUAL MEMORY USED: arene WORDS ‘ a. A “genic 
DYNAMIC MEMORY: 9474 ( 36P 

ELAPSED TIME: 0076 07: Ya 

CKKABC ..BIN, CKKABC/CR/=SP/NL : TOC=CKKABC .MLB/ML , CKKABC .P11 


mM 10 














a 


ADDWO = 000000 
ADDW1 = 000000 
ADDW10 = 000000 
ADDW11 = 000000 
ADDW1 = 000000 
ADDW13 = 000000 
ADDW14 = 000000 
ADDW15 = 000000 
ADDW2 = 000000 
ADDWS = 000000 
= 000000 

ADDWS = 000000 
DW6 = 000000 
ADDW7 = 000000 
DwW8 = 000000 
DW9 = 000000 
ADEVCT = 000000 
E = 000000 
ADJNC 020640 
AENV = 000006 
NVM = 000000 
AFATAL = 000000 
AMADR1 = 000000 
AMADR2 = 000000 
AMADR3 = 000000 
AMADR4 = 000000 
AMAMS1 = 000000 
amamS2 = 000000 
AMAMS3 = 000000 
AMAMS4 = 000000 
AMSGAD = 000000 
AMSGLG = 000000 
AMSGTY = 000000 
AMTYP1 = 000000 
AMTYP2 = 000000 
AMTYP3 = 000000 
AMTYP4 = 000000 
APASS = 000000 
APRIOR = 000000 
020606 

ASWREG = 000000 
ATESTN = 000000 
AUNIT = 000000 
AUSWR = 000000 
AVECT1 = 000000 
AVECT2 = 000000 
000510 


CKKABC «CREATED BY MACRO ON 23-APR=81 AT 12:51. PAGE, 1 
SYMBOL CROSS REFERENCE 
VALUE. 


4 


N 10 







NCE 130 
CREF  v01 
REFERENCES 
17-389 
17=389 
17-389 
17-389 


"17-389 
102-1796 102-1798 102-1800 4¥102-1805 « 


9 
og 17-389 
96-1469 #96-1488 
38 17-389 
17-389 17-389 
17-389 17-389 


17-389 17-389 


17-389 

17-389 

17-389 

17-389 
17-389 17-389 
17-389 

96-1461 #96-1479 
17-389 17-389 
17-389 17-389 
17-389 17-389 
17-389 17-389 
17-389 

17-389 

16-385 
















CKKABC 


SYMBOL CROSS REFERENCE 
SYMBOL VALUE REFERENCES 

4 #14-35 
ph ag 244 


cc 177776 


CERMSK 177413 
CISMSG 
CPUERR = 177766 


016722 
016726 
022762 


DL11W 
DL11W1 
END 


4 
020672 #96-1495 


N 
GIN3 021140 96-1493 





CREATED BY MACRO ON 23-APR-81 AT 12: 3 


26-560 
30-593 


0 
101-1778 


#102-1794 
#96-1550 
96-1492 


PAGE ¢ 
QUENCE 131 
CREF 


vo1 


9 
*101-1778 


96-1494 


B11 


*97-1572 


28-575 
32-630 


67-1058 


97-1580 


57 
+95-1421 
*97-1585 


96-1444 
98-1587 


*96-1444 
*98-1587 





CREATED BY MACRO ON 23-APR=81 AT 12:51 


CROSS REFERENCE 


V 
023052 
000000 


a8 


177776 


022346 
0 4 


020762 


REFERENCES 
102-1806 


96-1506 


#1021812 
*22-434 


76-1111 
77-1114 
*96-1495 


"423-484 


23-509 
24-529 


SEQUEN 


*22-439 


96-1499 


23-485 
*23-515 
24-532 


23-486 


99-1708 
*102-1804 
99-167 


6 
*100-1752 
*88-1322 
*98-1609 


#104-1826 
*63-1006 


2 
102-1814 


PAGE 3 
CE 132 
CREF O01 


22-479 


96-1505 


23-488 
23-517 
24-534 


*23-491 


24-526 


99-1709 
#102-1815 


*99-1696 
*100-1754 


89-1325 
*98-1611 
104-1829 


63-1007 
*88-1300 


104-1835 


C11 


96-1510 496-1551 
*23-492 23-493 23-496 *23-499 
23-520 

24-537 24-537 24-540 24-540 
*23-500 23-502 23-504 *23-508 
24-526 24-529 24-534 24-543 
99-1720 99-1723 


99-1697 #99-1728 
*100-1756 *100-1758 *100-1760 *100-1762 


90-1341 91-1358 92-1377 94-1401 
102-1801 104-1833 #105-1838 

"97-1577 *97-1586 *98-1589 98-1598 
98-1620 *98-1623 +*98-1625 98-1628 
*68-1068 *68-1069 68-1070 *88-1271 
88-1305 88-1308  *97-1568  *97-1569 


23-501 
24-543 


23-510 


*100-1764 


95-1422 


*98-1601 
*38-1631 


*88-1272 
97-1570 
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QUENCE 133 

SYMBOL CROSS REFERENCE CREF  v01 

SYMBOL VALUE REFERENCES 

RETS 021002 96-1509  #96-1510 

RET4 020770 96-1444 #96-1509 

RT«AP = 000010 #14-363 *26-561 *27-567 *28-573 *29-579 *29-586 * 30-594 *30-595 * 30-605 
* 30-606 *53-884 *54-890 *55-896 *56-902 *56-909 *57-917 *57-918 *57-928 
toe 44 *58-940 *59=946 *60-952 *61-959 *61-966 *62-974 *62-975 *62-985 
x6hJ- 

RTRAP1 = 000034 222 *31-622 *32-628 *33-634 *34-640 #34-647 * 35-654 *35-655 *35-665 
* os 

RTRAP2 = 000020 bbe 28: *37-690 «38-696 *39-702 *40-708 *40-715 *41-723 #41-724 *41-734 
«xL1< 

RTRAP3 = 000030 are 5et *42-749 *43-755 *44-761 *45-767 *45~774 *46-782 ‘846-783 #46-793 
xhb=- 

RTRAP4 = 000014 #14-351 *48-817 *49-823 *50-829 *51-835 *51-843 *52-851 *52-852 *52-862 
*52-863 *79-1134 *80-1143 *81-1153 

RTRAPS = 000004 #14-350 %63-1001 *64-1013 — *65-1019 — *66-1025 = *66-1032 ) *67-1040 = *67-1041 = *67-1051 
*67-1052 *97-1561 = * 97-1573 

R6 =%000006 #14-344 *20-408 *22-433 *22-434 22-435 *22-438 *22-439 22-440 *22-443 


*78-1126 *78-1127.- *78-1128 = *85-1200 9 *85-1206 = *85-1212 = *85-1218 §=— *86-1227 = *87-1241 
489-1329  *90-1343 9 *91-1360 = *93-1388 )=— *93-1390 §=— *93-1391 = *94-1404 = *94-1412 


R7 =%000007 #14-346 *85-1202 +*85-1208 *85-1214 *85-1221 

SAVSTK 020516 #96-1459 = 96-1465 = * 96-1466 96-1480 

SEQ 021732 98-1587 #98-1632 

SETPIR 022434 99-1684  #100-1736 

SPIR 022424 rahe 99-1679  #99-1726 100-1737 100-1739 100-1741 100-1743 100-1745 100-1747 

SPSW 022426 *98-1598 98-1599  *98-1606 98-1607 *98-1620 98-1621 *98-1628 98-1629  *99-1678 
99-1679 99-1687 #99-1727 

STATUS = 177776 #14-361 *25-547 *25-553 88-1296 *89-1328 +*89-1333 90-1344 +*90-1350 *91-1361 
*93-1396  *94-1406 94-1409  *94-1415 94-1417 *95-1435 95-1438 

TAB =%000003 #14-340 *96-1476  *96-1479 *96-1490 *96-1491 

TABLE 021044 96-1479 #96-1526 

TABLE1 021014 96-1476  #96-1514 

TENSAV 020514 *96-1446 #96-1458 96-1489 

TITLE 023300 20-406 #103-1821 

TNCIS 020560 96-1463 #96-147 

TPB = 177566 #14-358 *95-1430 *95-1433 +*105-1844 

TPS = 177564 #14-357 88-1319  +*95-1424 95-1428 95-1431 = 95-1434 = 95-1442 105-1842 105-1846 

A = 000010 #14-362 26-562 27-568 28-574 29-582 29-589 30-596 30-607 

TRAP10 020476 96-1447 #96-1452 

TRCSR_ = 177560 #14-356 *92-1380 92-1384 

TRP240 022432 *99-1681 *99-1683 99-1691 99-1707 #100-1733 

TRP244 020466 96-1445  #96-1450 

TRT = 000003 #14-349 48-818 49-824 50-830 51-838 51-846 52-853 52-864 75-1110 

TSFCIS 020520 96-1449  #96-1460 96-1485 

TSTi 000652 20-418 #22-432 

TST10 002620 28-571 28-576 429-577 
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SEQUENCE 134 
SYMBOL CROSS REFERENCE CREF vO1 
SYMBOL VALUE REFERENCES 
TST100 015422 84-1187 84-1198  #85-1199 
TST101 015744 85-1199 85-1225 #86-1226 
TST102 016114 #87-1240 
TST103 016240 #88-1254 
TST104 6734 #89-1324 
TST105 017112 #90-134 
TST106 017300 #91-1357 
TST107 017466 #92-1376 
TST11 002776 29-577 29-591 #30-592 
TST110 017622 92-1376 92-1385 #93-1387 
TST111 017746 #94-1400 
TST112 020152 #95-1421 
TST113 020374 #96~-1444 
TST114 021140 #97-1558 
TST115 021414 #98-1587 
TST116 021750 #99-1652 
TST117 022630 99-1706 99-1717 #101-1778 
TST12 003334 #31-618 
TST13 003440 31-618 #32-626 
TST14 003540 32-626 32-631 #33-632 
TST15 003642 33-632 33-637 #34-638 
TST16 004016 34-638 34-651 #35-652 
TST17 004342 35-652 35-676 436-677 
TST2 001232 22-432 22-481 #23-482 
TST20 #37-688 
TST21 004562 37-688 #38-694 
TST22 004662 38-694 38-699 #39-700 
TST23 004764 39-700 39-705 440-706 
TST24 005142 40-706 40-720 #41-721 
TST25 005500 #42-767 
TST26 005572 42-747 #43-753 
TST27 005672 43-753 43-758 444-759 
TST3 001612 23-482 23-521 #24-522 
TST30 005774 44-759 44-7 #45-765 
TST31 006152 45-765 45-779 #46-780 
7ST32 006472 46-780 46-802 #47-803 
TST33 006620 #48-815 
TST34 006712 48-815 449-821 
TST35 007012 49-821 49-826 #50-827 
TST36 007114 50-827 50-832 #51-833 
TST37 007272 51-833 51-848 #52-849 
TST4 002102 24-522 24-544 #25-545 
TST40 007630 #53-882 
TST41 007722 53-882 #54-888 
TST42 010022 54-888 54-893 #55-894 
TST43 010124 55-894 55-899 #56-900 
TST44 010302 56-900 56-914 #57-915 
TST45 010622 57-915 57-937 #58-938 
TST46 010714 58-938 59-944 
TST47 011014 59-944 59-949 #60-950 
TST5 002324 25-545 25-558 #26-559 


TST50O 011116 60-950 60-955 #61-957 


Sa a eee 

| 
CPUOP 
$ENDAD 


CKKABC CREATED BY 
SYMBOL aie REFERENCE 
SYMBOL VAL 
TST51 011274 
TST52 01161 
TST55 011774 
TSTS4 012076 
TST55 012202 
TSTS6 012364 
TST57 012710 
TST6 002416 
TST60 013050 
TST61 013150 
TST62 013334 
TST63 013442 
TST64 013550 
TST65 013656 
TST66 013764 
TST67 014072 
TST7 002516 
TST70 014220 
TST71 014326 
TST72 14464 
TST73 014570 
TST74 014714 
TST75 015026 
TST76 5136 
TST77 015276 
TTCSR = 177564 
T24TRP 022412 
T4TRP 022376 
ZTRP 022362 
SAPTHD 00033 
$ 000326 
SDEVCT 000310 
023042 
SENV 000320 
SENVM 000321 


or 


NOU 
Co oo--— 


417-389 


MACRO ON 23-APR=81 AT 12: rane 


61-971 
62-994 
64-1016 
7 
67-1060 


69-1078 
#71-1106 


27-570 
#77-1114 


#18-391 


20-403 


102-1797 


#62-972 
#63-996 


#65-1017 
#66-1023 


#67-1038 
#68-1061 


#70-1079 


#28-571 


#81-1151 
#82-1160 
#83-1170 


*89-1336 


PAGE g 
EQUENCE 135 
CREF 


F 11 


vo1 


*90-1346 +*90-1355 *91-1362 *92-1379 92-1382 


102-1799 #102-1808 


104-1831 


105-1840 


*94-1408 


